Есть ответ 👍

В таблице представлены характеристики 10 крупнейших озер Казахстана

261
392
Посмотреть ответы 2

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


ничего нету братишка...


Простая реализация без массива uses crt; var a, b, c, d, k: integer; begin readln(a, b, c, d); clrscr; if (a mod 5) = 0 then inc(k); if (b mod 5) = 0 then inc(k); if (c mod 5) = 0 then inc(k); if (d mod 5) = 0 then inc(k); writeln(k); end.

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