Есть ответ 👍

Спаскалем.с клавиатуры вводятся 5 натуральных чисел. определить, есть ли среди них числа, которые нацело делятся на 5 (вывести их на экран).

183
410
Посмотреть ответы 2

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


Program test; var   a,i: integer; begin for i: =1 to 5 do begin readln(a); if a mod 5 =0 then writeln('число  ',a,' делиться нацело на 5'); end; end.

Abs - модуль числа. по формуле плохо видно, в знаменателе 1 + |1/s|

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