Войти Регистрация Спроси ai-bota

Напишите,, программу полностью,чтоб работала))

Показать ответ

Ответ:

6aKalL

12.06.2020 21:02

var

x, y: real;

begin

readln(x);

if (x<=5) then y:=sqr(x)

else y:=sqrt(25*x);

writeln(y);

end.

0,0(0 оценок)

Популярные вопросы: Информатика

stepanyakimov2

23.05.2022 03:21

Постройте таблицы истинности для следующих логических выражений...

Vlad2691

10.06.2022 11:57

Python На вход программы поступает неизвестное количество чисел целых, ввод заканчивается нулём. Найти среднеарифметическое значение четных чисел....

Неоченьумноесущество

14.01.2023 09:42

1 вопрос: print (35+5) A 50 B 40 C 35 2 вопрос: print (15 - - 5) A 20 B 10 C 5 3 вопрос: print (13 % 2) A 1 B 6 C 26 4 вопрос print (13//2) A 1 B 6 C 26 5 вопрос import...

Tomikk1

31.03.2020 11:42

Напишите программу на языке Паскаль: Y={2*x2-4, если x 3 5*x2+x, если x 3...

Tsaryova21

17.08.2021 18:35

Pascal ABC. Составьте программу, выводящую на экран фрагмент таблицы умножения: 1 x 1 = 12 х 2 = 43 x 3 = 9... 9 х 9 = 81...

dementy1

20.05.2022 15:21

Аналық тақшаға қандай құрылғылар жалғанады...

lololololololololo11

04.06.2021 04:18

Отметь верные ответы. 1. Информация это…  сведения об окружающем мире  новости, которые мы получаем только из газет  человек получает информацию только при зрения 2....

buzaeva2013

12.06.2020 13:58

Интернеттің зияны мен пайдасы» тақырыбында эссе жазыңыздар....

daryabatova

06.06.2022 23:05

Примеры ситуаций в которых имеют место линейные, разветвляющиеся и циклические алгоритмы...

Ника5324

06.06.2022 23:05

1)определите значение переменной c после использования данного алгоритма: a: = 25; b: = a-a/5; c: = a*2-b*2; b: = (c/2)^2; c: = 2*b-a; порядок действий соответствует правилам...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку