Даны два различных числа. Составьте программу, которая заменяет наименьшее из двух чисел их суммой, а наибольшее их произведением.
5-9 класс
|
Помогите пожалуйста)
var a,b,c,d:integer;
begin
read(a,b);
c:=a+b;
d:=a*b;
if a < b then begin
a:=c;
b:=d;
end else begin
a:=d;
b:=c;
end;
write('a=',a,' b=',b);
end.
Другие вопросы из категории
если а=б, то без изменений
если а<б, то б=корень а
1. Вычесляются два числа - сумма первой, третьей и пятой цифр и сумма второй и четвертой цифр заданного числа.
2. Полученные два числа записываются друг за другом в порядке неубывания (безразделителей) .
Определите, сколько из приведенных ниже чисел могут получиться в результате работы автомата. 40 1030 130 1320 2019 1920 2013 213 3010
Вычислите кол-во информации, содержащейся в документе словаре . Представьте это кол-во в битах, байтах и в производных от них единицах.
Читайте также
2.Дано 2х значное число составить программу с помощью которой можно отпределить входит ли в это число цифра шесть.
2-ая Составить программу , которая в двумерном массиве случайных чисел элементы всех четных строк делает нулевыми
язык паскаль
1. Составьте программу для определения большего из двух чисел х или у
2. Составьте программу для нахождения площади прямоугольника по заданным сторонам а и б
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат