Program abc;
var a:integer;
BEGIN
writeln ('2+1*3=?');
read (a);
if a=5 then
writeln ('Ты молодец')
else ('Не правильно, попробуй еще раз');
END.
C: = a - b * 2;
Переменную b не обязательно брать в скобки, ибо умножение выполняется первее .
Txt - Notepad++
doc - Microsoft Word
bmp - FastStone Image Viewer
pdf - Acrobat Reader
zip - 7z, WinZip