Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program prim;
var i,x : integer;
begin
x: =1;
for i: =1 to 5 do
begin write (x,' ');
x: =x+2;
end;
end.
иван-занимается легкой атлетикой,петр-баскетболом, алексей-хоккеем, андрей-футболом
program xxx;
var n, c, d, e, s : integer;
write('введите число');
readln(n);
c: = n div 100;
d: =(n div 10) mod 10;
e: = n mod 10;
s: = c + d + e;
writeln('сумма чисел =', s);
readln
в двоичной 1000001
в восмеричной 101
в шеснадцатеричной 41
Популярные вопросы