Составить программу: 1)вычисление натуральных чисел кратных 5, от 10 до 40

111

485

Посмотреть ответы 3

Ответы на вопрос:

lera14mansurova

Информатика

4,8(21 оценок)

Program n_1; var a,b: integer; begin b: =0; begin for a: =10 to 40 do if a mod 5 = 0 then b: =b+1; end; writeln('количество чисел, кратных 5 -', b) end. программа использует "a" , как счетчик от 10 до 40, а "b" , как количество чисел, если число делится на пять без остатка, то количество чисел +1, ответ программы: 7 чисел