program lab1; - название программы
var - описание переменных
c:char; - переменная с типом
x:byte; - переменная с типом
res:real; - ввод данных
begin - началопрограммы
writeln('vvedite 1 bykvu'); - вывод данных на экран
readln(c); - оператор ввода
x:=ord(c); - присвоение к переменным
writeln(x); - вывод
res :=cos(x/100)/sin(x/100); присвоение к переменным
writeln('f(x) = ',res:5:2); вывод данных на экран
readln; оператор ввода
end. конец
Недочеты:
ОтветитьУдалить1. "c:char; - переменная с типом" - с каким типом?
2. "x:=ord(c); - присвоение к переменным" - к нескольким переменным сразу? Или к одной?
3. "readln(c); - оператор ввода" - а что именно вводится?
Задание зачтено с замечаниями.