Есть ответ 👍

Написать программу, которая заданное слово печатает, начиная с последней буквы

252
368
Посмотреть ответы 2

Ответы на вопрос:


program slovo; var s: string; i: integer; beginwriteln('введите слово'); readln(s); for i: =length(s) downto 1do beginwrite(s[i]); end; end.

tat2119
4,4(66 оценок)

Var x1,x2,y1,y2: real; begin write('x1 = '); readln(x1); write('y1 = '); readln(y1); write('x2 = '); readln(x2); write('y2 = '); readln(y2); writeln('(',x1+(x2-x1)/2,',',y2+(y1-y2)/2,')') end.

Популярно: Информатика