Вопрос по информатике:
Введите с клавиатуры два числа a и b . Если оба числа четные , то вычислите их сумки выведите результат на экран .если оба нечетные то найдите произведение этих чисел и выведите результат . Иначе, увеличить все числа в пять раз и выведите результаты
- 02.03.2018 13:58
- Информатика
- remove_red_eye 18809
- thumb_up 34
Ответы и объяснения 1
Uses crt;
var a, b, S, M, New, New1:integer;
begin
write('a = '); read(a);
write('b = '); read(b);
S:=a+b; M:=a*b; New:=5*a; New1:=5*b;
if ((a mod 2)0) and ((b mod 2)0) then write('M = ',M)
else if ((a mod 2)=0) and ((b mod 2)=0) then write('S = ',S);
if ((a mod 2)=0) and ((b mod 2)0) then write('New = ',New);
if ((a mod 2)0) and ((b mod 2)=0) then write('New1 = ',New1);
end.
Описание:
S=сумма чисел. M=произведение чисел. New=увеличение числа в 5 раз,если 1-ое число четное. New1=увеличение числа в 5 раз,если 2-ое число четное.
- 03.03.2018 19:17
- thumb_up 33
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.