Вывести на экран все цифры числа k. (Блок-схема, решение самой задачи) Срочно надо, спасайте!
Вывести на экран все цифры числа k. (Блок-схема, решение самой задачи) Срочно надо, спасайте!
Гость
Ответ(ы) на вопрос:
Гостьvar k: integer;
a: string;
begin
readln(k);
a := inttostr(k);
for k := 1 to length(a) do
write(a[k] + ' ');
end.
Не нашли ответ?
Похожие вопросы