Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var a,b,c : string;
begin
write('введите название 1 фигуры-');
readln (a);
write('введите название 2 фигуры-');
readln (b);
write('введите название 3 фигуры-');
readln (c);
writeln (' фигуры: ',a,b,c);
readln
end.
24576/8=3072 символа
ответ: 3072 символа
Популярные вопросы