Question

Написать программы на языке программирования Паскаль:

Answer 1

Коды заданий на картиночках:

Answer 2

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (a,b,c):=ReadReal3; // общий
  Println(c,b,a); // 1
  Writeln('D=',b*b-4*a*c) // 2
end.

begin
  var s:=SeqFill(5,'Привет'); // общий
  s.Println(','); // а)
  s.PrintLines // б)
end.