Выучить наизусть
var x: real;
begin
writeln('введите x');
readln(x);
if x>0
then writeln('число положительное')
else writeln('число отрицательное');
end.
В тетрадь только ответы
№1. Условный оператор в общем виде имеет вид:
а) If < условие > then <оператор 1> else <оператор 2>;
б) If < оператор 1> then <оператор 2> else <оператор 1>;
в) Then <условие> if <оператор 1>else <оператор 2>;
№2. Если условие ложно, то выполняется оператор, записанный после ______________.
№3. Program pr1;
Var a: integer;
Begin
Writeln (‘сколько будет 7*6?’);
Readln(a);
If a=42 then writeln (‘верно’) else writeln (‘неверно’)
End.
Каким будет результат программы при вводе числа 13?___________ 42?________________ 46?_________________
№4. В блок-схемах оператор If, обозначают ___________________.
№5. Запишите на языке Pascal следующее сравнение двух выражений:
а) k больше m;
б) k не равно 20;
в) 4m минус 8 меньше либо равно -3.
№6. . Запишите на языке Pascal следующее условие: 4≤k<12.
№7. Истина или ложь будет результатом следующих логических операций:
а) (5<9) and (1>5)______________________________?
б) (2>-1) or (8<3)______________________________?
в) not (3<7)_________________________________?
опрос ученика
тест: 6 заданий+2 балла дз+2 балла задача наизусть