Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program p;
var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end.
uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.
Популярные вопросы