igorlevocko

13.09.2022 06:40 •  Информатика

20 за ! 1. определите, без компьютера, что будет напечатано в результате работы программы, при а=129, b=235? var a, b: integer; begin write('введите a: '); readln(a); write('введите b: '); readln(b); if a > b then writeln ('a = ',a,'; b = ',b) else writeln ('a = ',b,'; b = ',a); end. 2. определите, без компьютера, что будет напечатано в результате работы программы, при k=302? var k, number: integer; begin write('введите день года: '); readln(k); number : = k mod 7; writeln('номер дня недели: ',number); end