Устройство хранение программ и данных 6 букв первая п

1 бит на 1 символ, поэтому:

14400*10=144000 символов 

336600*10=3366000 символов 

var

s,n,i: integer;

begin

write('введите количество чисел');

readln(n);

s: =0;

for i: =1 to n do

s: =s+i*3;

writeln(s);

end.

a-возраст cаши

b– возраст маши

program r;

var a,b: integer;

begin

readln(a,b);

if a=b then writeln («ровесники»)else writeln( «неровесники»)

end.