Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.