Включение компьютера - нажатие внизу слева кнопки окошек (4 квадрата) или же на клавиатуре кнопка (четыре квадрата) возле пробела
Простое
.................
Program task1;
var n, S, k, i: integer;
begin
write('Кол-во чисел = ');
readln(n);
S := 0;
For i := 1 to n do
begin
write('Введите число ');
readln(k);
S := S + k
end;
writeln('Сумма введенных произвольных чисел = ', s);
end.
70 Мб/с = 71 680 Кб/с<em>( В 1 МегаБайте, 1024 Килобайт)</em>
71 680 / 90 = <u>796,4 сек = 13,3 мин</u>
Код в приложении
Компилятор - Pascal ABC.NET