- трансляторы;
- среда разработки программ;
- библиотеки;
- отладчики;
- редакторы связи.
1. 24
2. Данный массив не может существовать, и данная инициализация вызовет ошибку, поскольку масив может задаваться только позитивными числами
3. Она выведет на экран 0 -1 -4 и закончит работу
Вот. Умножение без помощи операции умножения. Делай лучшим)
program pr;
var i,a,b:integer;p:real;
begin
write('Первый множитель: ');
readln(a);
write('Второй множитель: ');
readln(b);
if b<0 then begin
b:=-b;
for i:=1 to b do begin
p:=p+a;
end;
writeln(-p:0:2);
end
else begin
for i:=1 to b do p:=p+a;
writeln(p:0:2)
end;
end.
Pascal ABC.NET beginVar a:=ReadInteger('Введите число');Var p:=ReadInteger('Введите p');if a mod 2=0 then writeln('Кратно двум');if a mod 3=0 then writeln('Кратно трем');if a mod p=0 then writeln('Кратно p');<span>end.</span>
Пусть x=5; y=7
<span>a)
t = x = 5
x = y = 7
y = t = 5
Итак, x=7; y=5. Переменные x и y поменялись местами
б)
x = x+y = 5+7 = 12
y = x-y =12-7 = 5
x = x-y = 12-5 = 7
</span>Итак, x=7; y=5. Переменные x и y поменялись местами<span>
в)
t = y = 7
y = t = 7
x = y = 7</span>