Даны два целых числа, А и В. Надо вывести в порядке возрастания числа от А до В, (включая А и В) а также кол-во этих чисел (N).
209
280
Ответы на вопрос:
Var a: array[1..20]of integer; b: array[1..20]of real; i,s: integer; begin write('massiv a: '); for i: =1 to 20 do begin read(a[i]); write(a[i],' '); end; writeln; write('massiv b: '); for i: =1 to 20 do begin b[i]: =sqrt(a[i]); write(b[i],' '); end; writeln; for i: =11 to 15 do begin s: =s+a[i]; end; write('summa elementov s 11 do 15: ',s); end.
Популярно: Информатика
-
liz04112.04.2023 17:24
-
Ly357711.01.2021 00:55
-
123281514.06.2023 18:40
-
egork995719.07.2022 11:01
-
мем2317.03.2020 20:51
-
alex11040324.05.2022 00:36
-
NastyuZnanija25.08.2022 00:36
-
vit720127.01.2021 08:07
-
coffeegiraffe17.11.2021 01:35
-
диль902.03.2020 13:27