Вычисли x=26+403+7 .
Запиши программу для вычисления x в Паскале и выведи на экран.

1.var
x:real;
begin
x:=(26+40)*(3+7);
writeln('x=',x:4:2);
readln;
end.
2.var
x:real;
begin
x:=(26+40)/(3+7);
end.
3.var
x:char;
begin
x:=(26+40)/(3+7);
writeln('x=',x:4:2);
readln;
end.
4.var
x:real;
begin
x:=(26+40)/(3+7);
writeln('x=',x:4:2);
readln;
end.

вот так понятней буде)) ну и более правильно, для

var a,b,c,d: integer; beginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); end. 

радиосвязь!

попов!

program;

var

max,val: integer;

label

start, ends;  

begin 

max: =-50;

val: =50;

start:

if val> max then val: =val-10

if val=max then goto ends;  

goto start;  

ends:

end. 

var x,s,n: integer;

begin

  repeat

        read(x);

        if x< 0 then n: = n +1;

        if x > 0 then s: =s+x;

  until x=0;

  writeln(n,s);

end.