Регистрация
zholdashev
31.01.2021 04:53
Информатика
Есть ответ 👍

Pascal ABC напишите программу. Напишите программу, которая в последовательности находит минимальное число оканчивающееся на 9 и кратное 3. Числа не превышают 30000.

235
347
Посмотреть ответы 1

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

natab02
natab02
4,8(69 оценок)
Var a,s,c,sr: integer; begin for i: =1 to 3 do begin write ('a='); read (a); end; s: =0; c: =0; for i: =1 to 3 do begin s: =s+a; c: =c+1; end; sr: =s/c; write (sr); end.

Популярно: Информатика