Sos sos sos!

(неясно-пиши в личку)

из пяти литровой переливаем в трех литровую получаем два литра сливаем их в ведро повтаряем процедуру получаем в ведре четыре литра

весь текст к бит к=7680 бит/с.* 90с =691200 бит

всего символов с   с=691200 бит/16бит=43200

всего страниц   ц   =ц=43200/400=108 с

uses crt; var a,s: integer; begins: =0; writeln('введите числа'); repeatreadln(a); if (a> 0) then s: =s+a; until a=0; writeln(s); end.