Предмет: Информатика,
автор: Sharabakina90
составить программу для нахождения цифр четырехзначного числа
Program n_221;
var a, b, c, d, abcd: longint;
что дальше??? Помогите плиз
Ответы
Автор ответа:
0
var a,n : integer;
begin
readln(a);
while a > 0 do
begin
n:= a mod 10;
a:= a div 10;
writeln(n)
end;
end.
begin
readln(a);
while a > 0 do
begin
n:= a mod 10;
a:= a div 10;
writeln(n)
end;
end.
Автор ответа:
0
а не я не правильно прочёл условие час исправлю
Автор ответа:
0
всё
Интересные вопросы
Предмет: Английский язык,
автор: Аноним
Предмет: Українська мова,
автор: tothbeata3454
Предмет: Английский язык,
автор: polina03241
Предмет: Химия,
автор: belicto
Предмет: Математика,
автор: jekarozz