В некотором царстве, в некотором государстве, в некотором НИИ создали компьютер «Магия-7», соблюдая все принципы Неймана-Лебедева. Память «Магии-7» разделили на сегменты, а сегменты на ячейки. Адрес сегмента – однозначное шестнадцатеричное число. Смещение – трехзначное шестнадцатеричное число. Оцените размер памяти компьютера «Магия-7».

у меня получилось, что первое число 954, второе 459, а третье 495. т.е. получился пример : 954-459=495

в ms excel по умолчанию числа выравниваются по правому краю, текст по левому

но при ручном форматировании можно выравнивать как угодно

program msd; uses crt; var a,l,proiz,b,i: longint; beginclrscr; readln(a); proiz: =1; while true do beginl: =a mod 10; a: = a div 10; if odd(l) = true thenproiz: =proiz*lelseb: =b+1; i: =i+1; if a = 0 then break; end; if b = i then writeln('0')elsewriteln(proiz); if (proiz> 99) and (proiz< 1000) then writeln('da')else writeln('net'); readkey; end.

(если сумма цифр числа делится на 3, то число делится на 3 нацело)

var a, s: integer;

begin

s: =0;

writeln ('введите число');

while a< > 0 do

begin

a: = a mod 10  

s: =s+a;

end;

if  s mod  3 = 0  then writeln ('делится') else

writeln ('не делится');

end.