Вычислить количество чисел, кратных 4, на отрезке - вопрос №449215223500 от manasaf118 11.11.2022 09:39

Question

Информатика: Вычислить количество чисел, кратных 4, на отрезке от 49 до 215. по паскалю!

manasaf118 · Answer

Program abc;

var a, b, c:integer;

Begin

a:=0;

c:=4;

for b:=49 to 215 do

if b/c mod=0 then a:=a+1

write ('Колтчество решений ', a);

end.

(паскаль давно не писал, вроде так)