profile
Опубликовано 6 лет назад по предмету Информатика от Burmilla

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

  1. Ответ
    Ответ дан SkyBy
    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<a1 then writeln ('Так как корень квадратный второго числа < корня первого числа, то увеличиваем число в 5 раз: ',b*5) else writeln ('Квадратный корень из ',b, ' больше');
    end.
Самые новые вопросы