Dr-motoshop
?>

Выведите на экран все цифры делящиеся на 5 без остатка в диапазоне от 1 до 35(включительно (Используйте цикл while, continue)

Информатика

Ответы

Koshovkina1721

var a,i: integer;

begin

a:=0;

while (a<=35 ) do begin

 a:=a+1;

 if (a mod 5 = 0) then

   writeln(a);

end;

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Выведите на экран все цифры делящиеся на 5 без остатка в диапазоне от 1 до 35(включительно (Используйте цикл while, continue)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

dvpered
gorsimonyan4
aregaa
Rafigovich1267
Dom540703174
art-03857
raa-0485428
pelagia-kola2658
olgusikok
korj8
sashab82
Наталья_Васищев
Алғашқы программалаушы кім???​
edvlwork15
Евгений1286
Станислав Роман994