Предмет: Информатика,
автор: igvgivhgivhigghi
Пожалуйста помогите прошу, написать программу на языке Паскаль
Приложения:

Ответы
Автор ответа:
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.
Пример:
Информатика это
интересный предмет,
но многие
не хотят её учить.
Информатика это интересный предмет, но многие не хотят её учить.
//Версия 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.
Пример:
Информатика это
интересный предмет,
но многие
не хотят её учить.
Информатика это интересный предмет, но многие не хотят её учить.
Интересные вопросы
Предмет: Информатика,
автор: xogajif349
Предмет: Химия,
автор: kseniazuleva310
Предмет: Русский язык,
автор: amirnamazbekov59
Предмет: Биология,
автор: Dimka210700