Измените программу из примера 8.3 так, чтобы всё слово было одним цветом (на выбор).
(пример 8.3)
uses graphabc;
var
s: string: n: integer;
begin
writeln('введи слово');
readln(s); writeln(s);
n: = length(s);
for i: = 1 to n do
writeln(s[i]);
end.

​

abduboriy2004    2   25.09.2019 15:16    6