Определите значение целочисленных переменных а и b после выполнения фрагмента программы: а: = 2521; b: = ((а div100)*101) mod 1000; а: = (b – (b mod 10))/10;

196

453

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

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

ArtemDigue

Информатика

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

b: =((2521 div 100)*101) mod 1000=(25*101) mod 1000=2525 mod 1000=525;

a: =(525-(525 mod 10))/10=(525-5)/10=520/10=52

ответ: a: =52; b: =525

Alfa1sames

Информатика

4,7(65 оценок)

var i,count: integer; proizv: longint; beginproizv: =1; count: =0; for i: =20 to 40 do begin if (i mod 2< > 0) then proizv: =proizv*i; end; for i: =20 to 100 do if (i mod 45=0)then 3{делятся на 4,5 и на 10=> делятся на 45} count: =count+1; writeln('произведение равно: ',proizv); writeln('число кратных чисел: ',count); end.