
Feris
5 год назад
Пожалуйста посчитайте пожалуйста!!! очень нужно!

ОТВЕТЫ

Lindsey Matthew
Oct 24, 2020
Program Primer;
var B:array[1..19] of real;
j:integer;
begin
for j:=1 to 19 do readln(B[j]); // или read(B[j]);
for j:=1 to 14 do writeln(B[j]);
end.
var B:array[1..19] of real;
j:integer;
begin
for j:=1 to 19 do readln(B[j]); // или read(B[j]);
for j:=1 to 14 do writeln(B[j]);
end.
52