1) написать программу На столе стоит 10 кастрюль, которые необходимо заполнить водой. В первую кастрюлю помещается 0,5 литра воды, а в каждую следующую на 0,5 литра больше, чем в предыдущую. Сколько воды потребуется для заполнения всех кастрюль?

Question

Евгеха

29 апреля, 17:11

+2

Ответы (1)

Знаете ответ на вопрос?

Има · Answer 1

Program prog;

uses crt;

var i:integer;

s:real;

begin

clrscr;

For i:=1 to 10 do s:=s+0.5*i;

write ('Потребуется ', s, ' л воды') ;

end.