Домашнее задание: Решить задачи: Задаются два разных по величине числа. Определить какое из этих чисел больше. (Сравнение двух чисел) Даны два числа. Если квадратный корень из второго числа меньше первого числа, то увеличит второе число в пять раз.

Question

Информатика

Кона

28 октября, 04:32

Домашнее задание: Решить задачи: Задаются два разных по величине числа. Определить какое из этих чисел больше. (Сравнение двух чисел) Даны два числа. Если квадратный корень из второго числа меньше первого числа, то увеличит второе число в пять раз.

+5

Ответы (1)

Знаете ответ на вопрос?

Анастасея · Answer 1

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
end.