program zz1;
var a, b, c, d, e, sum, pr:integer; //задаем переменные целого типа
begin
write(' введите первое число '); // вводим с клавиатуры первое число
read(a);
write(' введите второе число '); // вводим с клавиатуры второе число
read(b);
write(' введите третье число '); // вводим с клавиатуры третье число
read(c);
write(' введите четвертое число '); // вводим с клавиатуры четвертое число
read(d);
write(' введите пятое число '); // вводим с клавиатуры пятое число
read(e);
sum:=a + b + c + d + e;
pr:= a * b * c * d * e;
writeln(' сумма = ', sum); // выводим ответ
write(' произведение = ', pr);
end.м
Объяснение:
2. A = "Поиск длился 3 часа"; Б = "Результаты были"; F = A & не Б.
3. А = "Угол называется прямым"; Б = "Он равен 90 градусов"; F = A -> Б.
4. А = "Поехал в Турцию"; Б = "Поехал в Грецию"; F = A v Б.
5. A = "Идёт дождь"; Б = "Светит солнце"; F = A -> не Б.