Вопрос по информатике:
Срочно! Помогите, пожалуйста
Даны два различных числа a и b .Если a меньше b, то вычислить их произведение a*b, в противном случае- разность квадратов (a^2-b^2).Результат вывести на экран
Пожаловаться
- 07.05.2017 19:26
- Информатика
- remove_red_eye 7483
- thumb_up 33
Ответы и объяснения 1
Var a, b, rezultat: integer;
begin
writeln(`Введите значения a и b:`);
readln(a, b);
if a < b then
rezultat:=a*b
else
rezultat:=a*a-b*b
writeln(rezultat);
end.
begin
writeln(`Введите значения a и b:`);
readln(a, b);
if a < b then
rezultat:=a*b
else
rezultat:=a*a-b*b
writeln(rezultat);
end.
Пожаловаться
- 08.05.2017 14:21
- thumb_up 26
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы