Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
-a*b+c
not a and b or c
min і max нужно присвоить а[1].
138 байт,потому что 1024 бита=128 байт=> 10+128=138 как-то так.
var
s,n,i: integer;
begin
write('введите количество чисел');
readln(n);
s: =0;
for i: =1 to n do
s: =s+i*3;
writeln(s);
end.
Популярные вопросы