Домашнее задание:Решить задачи:Задаются два разных по величине числа. Определить какое из этих чисел больше. (Сравнение двух чисел)Даны два числа. Если квадратный корень из второго числа меньше первого числа, то увеличит второе...
Домашнее задание:Решить задачи:Задаются два разных по величине числа. Определить какое из этих чисел больше. (Сравнение двух чисел)Даны два числа. Если квадратный корень из второго числа меньше первого числа, то увеличит второе число в пять раз.
Гость
Ответ(ы) на вопрос:
Гостьvar a,b: integer; a1,b1: real;
begin
write ('Введите первое число: '); read (a);
write ('Введите второе число: '); read (b);
a1:=sqrt(a);
b1:=sqrt(b);
writeln ('Квадратный корень из ',a, ' = ', a1);
writeln ('Квадратный корень из ',b, ' = ', b1);
if b1
Не нашли ответ?
Похожие вопросы