Предмет: Информатика, автор: Kramer64

Приписать по цифре a в начало и конец записи числа n (a вводится с клавиатуры)

Ответы

Автор ответа: BiFi
0
Программа на Паскале
Program BiFi;
Var a,n,k,l:LONGINT;
Begin
readln(n);
readln(a);
k:=10;
l:=a;
while l>9 do begin l:=l mod10;
                             k:=k*10;
                             end;
a:=n*k + a;
a:=a*10+n;
wrietln9a);
readln;
end.



Автор ответа: BiFi
0
не знаю, вроде все правильно, может ошиблись, когда печетали?
Автор ответа: Kramer64
0
Ввожу: 10, потом 6. Должно получиться 6106, а получается 1070.
Автор ответа: BiFi
0
Извините, надо идти, я подумаю и напишу вам позже. Давайте добавим друг друга в друзья, чтобы потом найтись
Автор ответа: Kramer64
0
Ок, конечно
Автор ответа: Kramer64
0
Все, разобрался.
Похожие вопросы
Предмет: Английский язык, автор: Elenshlegergalina
Предмет: История, автор: Lovina12