Предмет: Информатика, автор: igvgivhgivhigghi

Пожалуйста помогите прошу, написать программу на языке Паскаль

Приложения:

Ответы

Автор ответа: Giammy
0
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)


1)
begin
  var (x1,y1):=ReadInteger2('x1,y1=');
  var (x2,y2):=ReadInteger2('x2,y2=');
  WritelnFormat('Центр ({0};{1})',(x1+x2)/2,(y1+y2)/2);
end.

Пример:
x1,y1= 1 2
x2,y2= -1 2
Центр(0;2)

2)
begin
  ReadArrString(4).JoinIntoString(' ').Println;
end.

Пример:
Информатика это
интересный предмет,
но многие
не хотят её учить.
Информатика это интересный предмет, но многие не хотят её учить.

Интересные вопросы