Program wtf;
var a,b,c,S:integer;
begin
writeln('Введите a');
readln(a);
writeln('Введите b');
readln(b);
writeln('Введите c');
readln(c);
S:=a+b+c;
writeln('Сумма цифр= ',S);
end.
1/4*1024(байт)=256 байт/64=4 байта*8 бит=32 бита (вес 1 символа)
2^32=<span><span>4294967296 символов в алфавите</span></span>
Алгоритм записан на школьном алгоритмическом языке, который практически совпадает с Паскалем, поэтому конвертирование а Паскаль выполняется "строка в строку" путем тривиальной замены русских служебных слов английскими.
var
x:real;
begin
Read(x);
if x<0 then
Writeln('отрицательное число')
else Writeln('положительное число')
end.
В Unicode 1 символ кодируется одним байтом.
F =20*30*50*1 =30 000 байтов =(30 000:1024) Кбайтов ≈ 30 Кбайтов
(30 : 1024) Мбайтов ≈0,02861 Мбайт