Регистрация
катяkfrr
23.09.2022 08:11
Информатика
Есть ответ 👍

Чи може виконання циклу з передумовою ніколи не закінчитися наведіть приклади поясніть свою відповідь очень

182
338
Посмотреть ответы 1

Ответы на вопрос:

COYOT61
COYOT61
4,8(69 оценок)
Наверное так uses crt; var       a, b, h, x, fx: real;       i, n: integer; begin       clrscr;       write('введите отрезок a,b и величину шага h =');       read(a, b, h);             writeln(' x ': 2, ' ', ' fx ': 5);             x : = a;       for i : = 1 to round(abs(b - a) / h) do       begin               fx : = cos(x) / sin(x) + 1;               writeln(x: 2: 5, ' ', fx: 5: 6);               x : = x + h;       end;             readkey; end.

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