Предмет: Информатика,
автор: Liza1VayVay
Проверить, делится ли случайное число на 3. Сообщить полученный результат.
Паскаль
Ответы
Автор ответа:
0
var
z: integer;
begin
randomize;
z:=random (1000) -500;
writeln (z);
if z mod 3=0 then writeln (' число делится на 3')
else writeln (' число не делится на 3')
end.
Интересные вопросы
Предмет: Математика,
автор: Аноним
Предмет: Астрономия,
автор: kturss
Предмет: Русский язык,
автор: Аноним
Предмет: Биология,
автор: новичок239
Предмет: Математика,
автор: влад27111