Program n_1;
Var a, b, c, S, n: Integer;
Var q:Real;
Begin
Writeln('' Введите первое число'');
Readln(a) ;
Writeln('' Введите второе число'');
Readln(b) ;
Writeln('' Введите третье число'');
Readln(c) ;
S:=a+b+c;
n:=a*b*c;
q:=S/3;
Writeln(S) ;
Writeln(n) ;
Writeln(q) ;
end.
30 * 70 = 2100 символов на 1 странице
5 * 2100 = 10500 символов на 5 страницах
При кодировке ASCII - 1 символ = 1 байт, значит 20500 байт оперативной памяти займет этот текст.
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
var n:=readinteger('n=');
var mas:=ArrRandom(n,-99,99);
Writeln('количество различных элементов->',mas.Distinct.Count);
end.
Арифметика. Надо узнать объем информации в битах и разделить на скорость модема:
258*1024*8/128000 = 16.512≈16.5 сек
Ответ: ≈16.5 сек
<span>1.5 К/байт = 1536 Байт = 12288 Бит. Это так!!!</span>