Ответы
Ответ дал:
0
Ответ:
1) program control 1;
uses crt;
var x,y,sum:integer;
begin
x:=5; y:=7;
sum:=x+y;
writeln('сумма x и y равна ', sum);
end;
2) longint, real;
3) 10/2 результат 5;
3>2 и 5<6 результат True;
round(7/3)=2, pred(-5)=-6, succ(-12)=-11 результат -11;
ord('5')=53, ord('3'=51), odd(5) нечетное, odd(3) нечетное результат всего true;
Объяснение:
Аноним:
после begin ClrScr; нужно добавить
Вас заинтересует
4 месяца назад
4 месяца назад
6 месяцев назад
2 года назад
7 лет назад