Помогите составить программу в Pascal ABC

С клавиатуры вводят названия трех геометрических фигур, например:

- ромб

- квадрат

- круг.

Составить программу, которая выводит на экран эти названия, например: "Геометрические фигуры: ромб, квадрат, круг".

Question

Машура

8 декабря, 03:27

+2

Ответы (1)

Знаете ответ на вопрос?

Василия · Answer 1

Var s1, s2, s3:string;

begin;

readln (s1) ;

readln (s2) ;

readln (s3) ;

writeln ('Геометрические фигуры: ', s1,', ', s2,', ', s3,'.') ;

end.