в паскаль. помогите пожалуйста 1) Напечатайте все двухзначные числа, которые кратные 5 и...

0 голосов
52 просмотров

в паскаль. помогите пожалуйста

1) Напечатайте все двухзначные числа, которые кратные 5 и не кратные 3.


Информатика (89 баллов) | 52 просмотров
0

Числа самому брать? Сколько их брать?

0

Ну 10 чисел будет достаточно)

Дан 1 ответ
0 голосов

Var i:integer;
beginfor i:=10 to 99 do
If (i mod 5 = 0) and (i mod 3 <> 0) then writeln(i);
end.

(1.1k баллов)