Всем привет, мой предмет: Алгоритмы, структуры данных и программирование , нужно выполнить это задание(прикрепляю фотографию).
Вот код примера как это должно выглядеть:
program helpplss;
var
a, b, c, k, r, x, y: real;
begin
write('y, k, x =? ');
readln(y, k, x);
if y <> 0 then a := sqr(sin((k - 5) / y))
else a := 0;
b := x + y;
c := k - y;
if (a <> 0) and (b >= 0) and (c >= 0) then
begin
if b > 0 then b := exp(ln(b) / 6);
b := b + exp(4 * k + 1);
c := 5.6e8 * x + sqrt(c);
r := (c - b) / a;
writeln('r = ', r)
end
else writeln('Значение выражения не определено')
end.
, Я буду очень благодарен вам.
252
365
Ответы на вопрос:
5 вопросов нужно делить пополам: 1) загаданное число больше числа 16 (например да)2) от 17 до 32. загаданное число больше числа 24 (да) 3) загаданное число больше числа 28 (нет) 4) загаданное число больше числа 26 (да)5) загаданное число больше числа 27? если да, то это 28. если нет, то 27
Популярно: Информатика
-
влад2049121.02.2020 12:07
-
nilnazarov66620.08.2022 12:40
-
dasharisk210415.08.2021 23:12
-
ruzali430.12.2021 09:54
-
Dimatrubilov03.09.2020 17:14
-
superkurmaleev27.11.2020 21:15
-
брагим07.11.2022 10:18
-
РоманРазумный01.09.2022 08:42
-
ppdfsaf14.01.2022 00:49
-
alinaisaeva83913.01.2020 11:44