Решить по информатике , через паскаль найти среднее арифметическое всех двузначных чисел, кратных двум
239
310
Ответы на вопрос:
Program project1; var i, sum , colchet : integer; srarif : real; begin sum : = 0; colchet: = 0; for i: =10 to 99 do if(i mod 2 = 0) then begin sum : = sum + i; colchet : = colchet + 1; end; srarif : = sum / colchet; writeln(srarif: 0: 3); end.
Зачем заморачиваться с роутером? Есть родительский контроль. Или же можно поставить пароль на компьютер
Популярно: Информатика
-
ІванДурненький26.05.2023 02:05
-
mrchernuczky69824.09.2022 17:26
-
ильназ4809.08.2021 13:55
-
BYHOY19.12.2020 11:41
-
миньён917.01.2020 08:40
-
vika1009200523.06.2020 04:32
-
Otahalepi30.08.2022 22:28
-
kamilla19503.09.2022 15:23
-
Травка5820.11.2021 10:31
-
Cekretcv21.10.2022 06:05