Program chetnoe;Uses crt;Var x:integer;BeginClrscr;Writeln ('Ведите двузначное число');Readln(x);IF X mod 2=0 then Writeln ('Число четное')else Writeln ('Число нечетное');End.
Ответ: Б)2
Кажется так. Но ты сам попробуй подумать.
===== PascalABC.NET =====
begin
foreach var n in Range(100, 999) do
if n mod 81 = 0 then
Print(n)
end.
Пусть кузнечик сделал n прыжков вперед и m прыжков назад. Тогда он окажется в точке с координатой 15n - 6m = 3(5n - 2m) - делящейся на 3. Более того, можно допрыгнуть до точки с любой координатой, делящейся на 3: для того, чтобы прыгнуть на 3 единицы вперед, можно прыгнуть вперед на 15 и дважды назад.
Можно допрыгнуть до точек 480, 555