Основы разработки трансляторов в САПР. Коробова И.Л - 38 стр.

UptoLike

if (х.GЕ.0) у=х**З
type *,у
stop
end
13. Разработать трехпроходный транслятор с исходного языка на язык Фортран:
программа Р;
переменные s: вещественные;
i, n: целые;
s=1;
ввод n;
цикл 1 oт 1 до n с шагом 2
выполнить s=s*i/(i+1);
вывод s;
конец.
14. Разработать двухпроходный транслятор с исходного языка на язык Паскаль:
программа Е;
переменные h: вещественные;
n: целые;
h:=0;
читать(n);
пока n > 0 выполнить
(h:=h+l/n; n:=n–l);
печатать (h)
конец.
15. Разработать однопроходный транслятор с исходного языка на язык ПЛ-1:
integer m,n
do 10 n=11,49,2
m=n**2
type *,n,m
10 continue
stop
end
16. Разработать однопроходный транслятор с исходного языка на язык Фортран:
program К16;
var i,n: integer;
р,а:.геа1;
begin
read(n);
p:=1;
for i:=l to n do p:=p*(a+i–1);
write(p)
end.
17. Разработать двухпроходный транслятор с исходного языка на язык ПЛ-1:
программа PC;
переменные х, у: вещественные;
ввод (х,у);
если х>у то [ y=(x+y)/2;x=x*y/2]