Ответы на вопрос:
Var srar: real; s, i, k: integer; begin k: =0; s: =0; for i: =10 to 99 do if i mod 2< > 0 then begin s: =s+i; k: =k+1; end; srar: =s/k; writeln(srar: 5: 5); end.
Популярно: Информатика
-
помогите117717.04.2021 12:42
-
Андрей1158315.12.2022 01:13
-
Annet22505.04.2023 21:42
-
fdsufsycdst02.04.2023 01:23
-
ajselaskerova28.03.2023 11:06
-
сусанна2710.02.2020 19:01
-
vikki1748124.06.2020 21:28
-
alonsoqureaz06.05.2023 04:20
-
rzhanova0018.01.2020 08:49
-
sench99da31.01.2022 17:03