var a,b,c,d;integer;
begin
readln(a,b);
c:=a+b;
d:=a*b;
writeln('сумма',c);
writeln('произведение',d);
end.
это для паскаля
n:=5;
x:=0;
for i:=1 to n do
x:=i;
После выполнения цикла значение x будет равно 5
Label1.Caption:=IntToStr(x);
На экран будет выведено 5
- трансляторы;
- среда разработки программ;
- библиотеки;
- отладчики;
- редакторы связи.