Задание:
Написать программу, реализующую диалог с пользователем: предлагающую выбрать один из следующих вариантов расчета: 1 — расчет тригонометрической функции 2 — расчет квадрата числа 3 — расчет корня числа По нажатии клавиши 1 пользователю предлагаются следующие варианты: s — расчет синуса c — расчет косинуса t — расчет тангенса После выбора соответствующего пункта меню пользователю предлагается ввести число, по которому необходимо провести расчет и после расчета выводится значение. В случае, если пользователь выбрал несуществующий пункт меню ему выдается сообщение об ошибке.
Решение:
var x: real; c: char; beginreadln (c); readln (x); if c='1' then beginreadln (c); if c='s' then writeln (sin (x); if c='c' then writeln (cos (x); if c='t' then writeln (sin (x) /cos (x); end elseif c='2' thenwriteln (sqr (x) elseif c='3' thenwriteln (sqrt (x); end.
Знаете другой ответ?