Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
смотри описание блок схемы на картинке
файл с исходным текстом программы на паскале должен иметь расширение pas.
15 гб = 15*1024*8 = 122 880 мбит 32 минуты = 1920 секунд
122 880/1920 = 64 мбит/с
uses crt;
var a,s: integer;
begin
s: =0;
writeln('введите числа');
while a< > 0 do begin
readln(a);
if (a> 0) then s: =s+a;
end;
writeln('s=',s);
end.
Популярные вопросы