ПОМОГИТЕ ПОЖАЛУЙСТА С ИНФОРМАТИКОЙ!!!
1) Выберите из предложенных полные записи оператора 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
x:=0;
y:=0;
else
write(z);
b) Какое значение будет иметь переменная t после выполнения программы, если x=1.5, y=–0.8?
var x, y: real;
t: boolean;
begin
read(x);
t:=x
read(y);
t:=t or (y
writeln(t);
end.
4) Даны три числа. Возвести в квадрат те из них, которые положительны. Остальные оставить без изменения.
5) Записать на Паскале логическое выражение истинное только при выполнении следующего условия: хотя бы одно из чисел x, y, z является положительным.