goal

write("X = "),

readint(X),

nl,

write("K = "),

Возможно вы искали - Курсовая работа: Конвертер программы с подмножества языка Си в Паскаль с использованием LL1 метода синтаксическог

readreal(K),

nl,

Z=exp(sin(X))+sqrt(K+X*X),

write("Z = ",Z).

Результат: X=5, K=16, Z=6,7864292326

Похожий материал - Контрольная работа: Boot Record команды DOS Norton Commander Windows

2. В режиме калькулятора вычислить X = (2 + 5) * 3,4, т.е. вводя значения 2, 5, 3.4 с клавиатуры.

goal

write("X = "),

readint(X),

nl,

Очень интересно - Дипломная работа: Машинная память

write("K = "),

readint(K),

nl,

write(“N= “),

readreal(N),

Вам будет интересно - Доклад: Компьютерные определители

nl

Z=(X+K)*N,

write("Z = ",Z).

Результат: 23,8

Задание 7.

Реализовать приведенную программу с внешней связью, выполнив все четыре арифметические операции.

predicates

Похожий материал - Статья: Основы работы в Internet

operation(symbol,real,real)

clauses

operation("+",X,Y):-Z=X+Y,

write(X,"+",Y,"=",Z),