На вход программе подаётся последовательность из N положительных целых чисел. Сначала вводится число N, а затем все остальные числа. Программа должна нати среднее арифметическое тех чисел, которые делятся на 3 и последняя цифра которых при том равна 7. (язык паскаль)
205
383
Ответы на вопрос:
var a,i: integer;
begin
readln(a);
for i: =13 to 50 do
if (a*i> =50) then begin
writeln(i);
break;
end;
end.
Популярно: Информатика
-
LiliLay1717.12.2022 17:09
-
marina992612.01.2020 21:57
-
123KETCHUP12307.04.2022 19:36
-
Sapika29.03.2022 20:41
-
steamlox108.07.2020 14:36
-
zhenyaminaev216.03.2022 16:21
-
норочка310.01.2022 10:23
-
PolinaSukova228.06.2023 05:19
-
ladygum7808.05.2022 14:43
-
Наташа135806422520.02.2022 08:37