{\rtf1\ansi\ansicpg1251\deff0\deflang1049{\fonttbl{\f0\fswiss\fcharset204{\*\fname Arial;}Arial CYR;}} {\*\generator Msftedit 5.41.15.1515;}\viewkind4\uc1\pard\f0\fs20 programm z1;\par var a,b,c,d: real;\par begin\par writln ('\'e2\'e2\'e5\'e4\'e8\'f2\'e5 a,b,c');\par readln (a,b,c);\par begin\par if a>b thn d:=a+c\par if a