6. Соотнеси арифметические операции 60//121
round (25.2643,2)2
math. int (-5.6) 3
math. abs
(25.267)4
251
-52
25.263
54
46

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end. 

сред. арифметическое = сумма всех чисел разделить на количество

(a1 + a2 + a3 + a4 + a5) / 5

на египетскую

вавилон-клинопись

финикия-подобие букв без гласных

египет-иероглифы

program d; var s : string; begins : = 'параллелограмм'; delete(s, 1, 9); delete(s, 3, 2); insert('о', s, 3); write(s); end.