Напишите процедуру, которая выводит на экран переданное ей число в системе счисления, которая задаётся вторым параметром (от 2 до 10). Pascal!

Ответы

Ответ дал: supersuperkirip54irs
0

var s1:string;

N,a:integer;

BEGIN

write('Введите число в 10-ой системе счисления: ');

readln(N);

write('Введите новое основание системы счисления: ');

readln(a);

s1:='';

while N<>0 do begin

if N mod a<=9 then s1:=inttostr(N mod a) + s1;

N:=N div a;

end;

write('Число в новой системе счисления: ');

writeln(s1);

end.

Ответ дал: grattttt
0
очень надо срочно !!!!!!!
Ответ дал: grattttt
0
Supersuperkirip54irs
Ответ дал: Артур998
0
Помоги пожалуйста 98 баллов по информатике https://znanija.com/task/31783367
Ответ дал: Красотка1259
0
Помогите с информатикой : https://znanija.com/task/31842797
Ответ дал: ValeraDavay
0
Здравствуйте, можете пожалуйста помочь с доказательством тождества по информатике?
Вас заинтересует