Написать программу на паскале
С=корень а в квадрате + b в квадрате
Нет комментариев
Ответы
Гость Varc,a,b : real;beginwriteln('введите длину а.');readln(a);writeln('Введите длину b.');readln(b);c:= sqrt(sqr(a)+sqr(b));if c>0 thenwriteln ('С = ',c)else writeln('Такого С не существует.');end.
2 комментария:
varc,a,b : real;beginwriteln('введите длину а.');readln(a);writeln('Введите длину b.');readln(b);c:= sqrt(sqr(a)+sqr(b));if c>0 thenwriteln ('С = ',c)else writeln('Такого С не существует.');end.
Отправил в комментарии,чтобы скопировал нормально по строкам(Программа рабочая,проверил в компиляторе)
varc,a,b : real;beginwriteln('введите длину а.');readln(a);writeln('Введите длину b.');readln(b);c:= sqrt(sqr(a)+sqr(b));if c>0 thenwriteln ('С = ',c)else writeln('Такого С не существует.');end.
Отправил в комментарии,чтобы скопировал нормально по строкам(Программа рабочая,проверил в компиляторе)
Гость Алгоритм ветвление, поэтому должно быть верно.
Нет комментариев
Похожие вопросы
Информатика
Записать в традиционной математической форме формулы электронной таблицы A1^(2+3*A2)/(A1+B2)*(14*B2)/25...
Информатика
О каком носителе информации идет речь СЕКДИАТ...
Информатика
О каком носителе идет речь ЧЕВИСТЕРН...
Список предметов
