Var
k:integer;
a,s:real;
begin
while k < 7 do
begin
write('Введите число: ');
readln (a);
s:=s+a;
k:=k+1
end;
writeln('Сумма 7 чисел равна: ',s)
end.
КуКЛА ВИшня ШАры - КЛАВИША
Только наверно после шаров тоже две запятых...
Пусть х мальчиков. Первоначально собрали 50х руб. Добавили 10х руб. Стоимость мяча равна (50х+150) руб или ((50х+10х)-70) руб. Приравняем эти выражения и узнаем, сколько мальчиков было.
50х+150=(50х+10х)-70
50х+150=60х-70
60х-50х=150+70
10х=220
х=22 мальчика
50*22+150 =1250 руб - стоит мяч
Ответ. 22 мальчика, 1250 руб стоит мяч