М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

1. Запишите общий вид условного оператора полной формы в языке Паскаль.
2.Запишите общий вид условного оператора неполной формы в языке Паскаль.
3.Запишите общий вид условного оператора
к данной схеме. Как он называется?
4.В каком из представленных ниже вариантов условный оператор записан с ошибкой? Запишите номер варианта, перепишите фрагмент программы с исправленной ошибкой.
а) if B = 0 then Writeln ('Деление на нуль невозможно.');
б) if a > b then m:= a else m:= b;
в) if a>b then c:=a+b;
г) if a < b then min:= a; else min:= b;

5. Составить программу: ввести два числа с клавиатуры, если их произведение отрицательно, то умножить его на -2, в противном случае увеличить его в 3 раза. Вывести результат на экран.
6.Ввести два числа x и y. Если x>y, ​то: x= x – y, y = 2x + y, вывести результат.
иначе: y = y – x, x= x – 2y, вывести результат.
7. Ввести два числа. Если их сумма четная, то найти произведение, в противном случае найти разность этих чисел.
8.Компания набирает сотрудников от 25 до 40 лет включительно. Ввести возраст человека и определить, подходит ли он для данной компании (вывести ответ «подходит» или «не подходит»).

👇
Открыть все ответы
Ответ:
pilizaveta13
pilizaveta13
03.09.2021

Відповідь:

Закон поглощения – это закон математической логики, согласно которому верны следующие равенства: Закон склеивания. Логическая операция, в процессе которой два члена формулы, имеющие одинаковую часть, заменяются одним членом, как бы склеиваются, носит название закон склеивания. Пусть имеется сложное высказывание. ... Например: «Неверно, что завтра будет холодно и завтра будет дождливо, если и только если завтра не будет холодно или завтра не будет дождливо». Другой закон: неверно, что А и В, если и только если неверно А и неверно В.

Пояснення:

4,4(88 оценок)
Ответ:
05Goryanka05
05Goryanka05
03.09.2021
Программа для 1.
var
  n,b,s:integer;
begin
  Write('Введите натуральное число и значение b: ');
  Read(n,b);
  if n>b then Writeln('Неверно')
  else begin
    s:=0;
    while n>0 do begin
      s:=s+n mod 10;
      n:=n div 10
    end;
    if s mod 2=0 then Writeln('Верно') else Writeln('Неверно')
  end
end.

Программа для 2.
var
  k,m,n,b,s:integer;
begin
  Write('Введите натуральное число и значения m,n: ');
  Read(k,m,n);
  if k mod n <> 0 then Writeln('Неверно')
  else begin
    s:=0;
    while k>0 do begin
      s:=s+k mod 10;
      k:=k div 10
    end;
    if s>m then Writeln('Верно') else Writeln('Неверно')
  end
end.
4,7(52 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ