1. Информатика
  2. Впаскаль нужно преобразовать

Впаскаль нужно преобразовать

Adam123RUS Adam123RUS    3   09.04.2019 11:57    18

Ответы
эдики эдики  28.05.2020 23:57

program primer;

begin var x,y:real;

readln(x);

if x<=5

 then y:=x**2

 else y:=sqrt(25*x);

writeln(y);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ilyazhuravlev1 ilyazhuravlev1  22.04.2020 13:24
ИНФОРМАТИКА 1. условие — логическое выражение; пока оно , выполняется тело цикла; а) истинно б) ложно 2. оператор или составной оператор, с которого записано цикла а) начало б)...
kumalena73 kumalena73  22.04.2020 13:24
Напишите программу питон, за лучший правильный ответ...
anka110 anka110  22.04.2020 13:25
Опишите словами, что делает ниже приведенная программа. Что выдаст программа в качестве ответа, если ввести х = 23, y = 5: program zadanie; var x, y, r q: integer; begin write (...
BRB987 BRB987  17.11.2020 09:17
Составить алгоритм, программу и блок-схему к заданию. ​...
Tomi1234 Tomi1234  17.11.2020 09:17
У МЕНЯ ЗАДАНИЯ ОЧЕНЬ НУЖНЫ ОТДАЮ СВОИ ПОСЛЕДНИЕ...
YTTeamGardnYT YTTeamGardnYT  19.04.2019 09:49
Отбросить дробную часть 9.8=int(9.8)=​...
makl192 makl192  19.04.2019 09:49
Rlz male enhancement do you feel appreciate you barely don’t have it in the dorm room anymore? for lesson, reasonably you’re struggling mutually a peaceful co habitation brought...
vikon2017 vikon2017  19.04.2019 10:02
1.вычислить a=x+y/x-3 2. ввести с клавиатуры число. определить, делиться ли оно на 5 без остатка. 3.даны два числа. введите первое из них, если оно больше второго, и оба числа,...
Эльвина567 Эльвина567  09.04.2020 11:32
Найдите площадь прямоугольного треугольника с острым углом α, если катет, прилежащий к углу α, равен b....
243013 243013  09.04.2020 11:32
Пусть x — некоторое натуральное число. Определите, что будет записано в переменной s после выполнения фрагмента кода s := 0; while x 10 do begin s := s + x mod 10; x := x div 10;...

Популярные вопросы