Ученики 9 класса собрали макулатуру. В сборе приняло 15 человек. Известно,сколько кг собрал каждый. Сколько всего макулатуры собрали ребята.
(pascal)
Ответы
Ответ дал:
0
Program sss;
Uses crt;
var
begin
writeln ('Сколько собрал каждый?');
for i:=1 to 15 do
begin
write (i,' - ый человек собрал ');
readln (kg);
s:=s+kg;
end;
writeln (s,' - кг всего собрали');
end.
Ответ дал:
0
Прости , забыл в Var переменные написать ,
Var i,s,kg:integer;
Var i,s,kg:integer;
Ответ дал:
0
Спасибо
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад