Есть ответ 👍

Даны два целых числа, А и В. Надо вывести в порядке возрастания числа от А до В, (включая А и В) а также кол-во этих чисел (N).

209
280
Посмотреть ответы 1

Ответы на вопрос:

sehya72
4,4(65 оценок)

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.

Популярно: Информатика