Вывести на экран цифры числа n (решение в паскале) в любом порядке

Ернур150400 Ернур150400    2   21.05.2019 11:30    0

Ответы
jcgddrMarins jcgddrMarins  01.10.2020 03:46

Program chisla;
uses crt;
var i,l:integer;
s:string;
Begin
Write('Введите число ,i = ');
Readln(i);
s:=inttostr(i);
l:=length(s);
clrscr;
For i:= 1 to l do
Writeln('Цифра числа № ',i,' = ',s[i],' ');
End.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика