с Паскалем, он пишет: Program1.pas(10) : Встречено 'writeln', а ожидалось ';' Программа: program z66; var k: integer; a, S: real; BEGIN writeln ('Подсчёт заработка продавца'); write ('Введите сумму, которую получает продавец с продажи первый 50ти газет: '); readln (a); write ('Введите количество проданных газет: '); readln (k); S := 50*a + (k-50)*1.2*a writeln ('Продавец получит ', S , ' рублей'); END