Question

с инфой Выберите из предложенных неполные записи оператора if:

a)

if x>y then x:=0

else y:=0;

c)

if x>y then x:=0;

b)

if x>y then

begin

x:=0;

y:=0;

end;

d)

if x>y then

begin

x:=0; y:=0;

end

else y:=110;

2) Запишите оператор ветвления в сокращенном виде.

3) Выполните одно из следующих двух заданий:

a) Найти и исправить ошибки в записи оператора ветвления:

if x>=y then begin x:=0; y:=0;

else end; write(z);

b) Какое значение будет иметь переменная t после выполнения программы, если x=2.1, y=8.4?

var x, y: real;

t: boolean;

begin

read(x);

t:=x
read(y);

t:=t or (y
writeln(t);

end.

4) Даны три числа. Увеличить в 5 раз те из них, которые отрицательны. Остальные оставить без изменения.

5) Записать на Паскале логическое выражение истинное только при выполнении следующего условия: хотя бы одно из чисел x, y, z является четным.

Answer 1

1) D

2)

полная форма if (условие) then ...else ...;

краткая форма if (условие) then ...;

3)

a) if x>=y then

begin

x:=0;

y:=0;

end;

else

write(z);

b)

1.5