с Паскалем, он пишет: 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