1. Выберите все строки, в которых условные операторы на языке Pascal записаны без ошибок:

1) if (x>0) and (x<=100) then y:=sqrt(x);

2) if x>=10 then y:=y mod x;

3) if (x>0) or (10*x)<100 then y:= x*х*х;

4) if 0<x<10 then write (‘х - однозначное число’);

5) if x=y then z:=1 else z:=x*y;

6) if x>0 then y:=sqrt(x); write (‘y=’, y) else write (‘нет ответа’);

7) if x<y then s:= x+y; p:=x*y else s:=0; p:=1;

8) if x<>0 then y:=100/x;

9) if x>0 then y:= 100 div x; else y:= 0;

10) if 10 then k:= k+1;

​

0 0 Пожаловаться