Вывести на экран все цифры числа k. (блок-схема, решение самой ) надо

danillbiz danillbiz    1   25.05.2019 10:10    0

Ответы
приветки1 приветки1  21.06.2020 11:53
Var k: integer;
    a: string;
begin
     readln(k);
     a := inttostr(k);
     for k := 1 to length(a) do
         write(a[k] + ' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика