Question

вывести кол во чисел кратных 11 и заканчивающиеся 3. На паскаль ​

Answer 1

Ответ:

program CountNumbers;

var

i, count: integer;

begin

count := 0;

for i := 1 to 100 do

begin

if (i mod 11 = 0) and (i mod 10 = 3) then

count := count + 1;

end;

writeln('Количество чисел, кратных 11 и заканчивающихся на 3: ', count);

end.

Объяснение:

Ну как то так