Вопрос по информатике:
Решите пожалуйста.
1) Даны 2 числа. Если сумма этих чисел равна 0, то вывести слово "да", противном случае вывести слово " нет".
2) если число,введённое с клавиатуры меньше 5, то вывести "меньше5".
3)дано целое число. Если оно равно 7, то вывести " воскресенье ".
4) даны 3 чичла. Если произведение этих чисел равно 0, то вывести " один равен 0".
5) даны 2 числа. Если разность этих чисел равна 0, то вывести "они равны". (ПОМОГИТЕ ОЧЕНЬ СРОЧНО НАДО!)
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 19.09.2017 04:42
- Информатика
- remove_red_eye 3645
- thumb_up 13
Ответы и объяснения 1
var a, b: integer;
begin
read(a,b);
if (a + b = 0) then writeln('Да') else writeln('Нет');
end.
2.
var num :integer;
begin
read(num);
if (num < 5) then writeln('меньше 5');
end.
3.
var num :integer;
begin
read(num);
if (num = 7) then writeln('Воскресенье');
end.
4.
var a,b,c :integer;
begin
read(a,b,c);
if (a * b * c = 0) then writeln('один равен 0');
end.
5.
var a,b :integer;
begin
read(a, b);
if (a - b = 0) then writeln ('они равны');
end.
- 20.09.2017 05:11
- thumb_up 34
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.