Задание:
Напишите программу на любом вам известном алгоритмическом языке. На вход программе подается число N. Программа формирует N случайных чисел сумму тех из нихостаток от деления которых на 5 больше двух
Решение:
Program gt; var a,i,n,s: integer; beginread (N); s: =0; randomize; for i: =1 to n dobegina: =random (500); if (abs (a) mod 5>2) then s: =s+a; end; writeln (s); end.
Знаете другой ответ?