1) напишите линейную программу, в результате выполнения которой в целочисленной переменной s получится перевернутое целое четырехзначное число k. например: k=1357, то s=7531. 2) напишите линейную программу перевода любого целого четырехзначного двоичного числа в десятичную систему счисления. например, дано число в двоичной системе счисления: 1101. перевод в десятичную систему выполняется так: 12^3+12^2+0*2^1+1=13.

297

356

Посмотреть ответы 2

Ответы на вопрос:

cuprinainna

Информатика

4,8(96 оценок)

1)var n,k: integer; begin write('число: '); readln(n); k: =0; repeat k: =k*10+n mod 10; n: =n div 10; until n=0; writeln('новое число: ',k); end. 2) var n,k,m: integer; begin write('двоичное число: '); readln(n); k: =1; m: =0; repeat m: =m+k*(n mod 10); n: =n div 10; k: =k*2; until n=0; writeln('десятичное число: ',m); end.