Question

ПОЖАЛУЙСТА СРОЧНО!!!

Answer 1

Ответ:

DIM u, i AS INTEGER  

u = 26

FOR i = 1 TO 5  

   u = u − i

NEXT i  

PRINT u

____________________

u = 26

for i in range(1,6):

   u = u − i

print (u)

___________________

var u, i: integer;  

begin  

   u := 26;

   for i := 1 to 5 do

       u := u − i;  

   writeln(u);  

end.

____________________

var x,y: integer;

begin

 readln(x);

 readln(y);

 if (x>10) or (y>10)

  then writeln("ДА")

  else writeln("НЕТ")

end.

Да - 5

Нет - ?