1) var n: longint; begin readln(n); writeln(n div 60)); end. 2) var n,m,i,j: longint; begin readln(n); m: =n mod 10 *10 + n div 10; writeln(n,'+',m,'=',n+m); end. 3) var a,b,c,d: longint; begin readln(a,b,c,d) ; dec(c,a); dec(d,b); if d< 0 then begin dec(c); d: =100 -abs(d); end; writeln(c,' рублей ',d,' копеек'); end. 4) var a: longint; begin readln(a); if odd(a) then inc(a) else inc(a,2); writeln(a); end. если что то не работает напиши .
sargisyan77
12.11.2021
Информацию можно поделить на декларативную и процедурную. процедурная сообщает о том, как достичь какой-либо цели, декларативная – обо всём остальном, о свойствах объектов, фактах, явлениях и т.д. 1. вся предложенная информация – декларативная, она содержит информацию об определениях (а, в, г) или свойствах (б, д) объектов. близок к процедурной информации вариант д, однако на мой взгляд, это всё ещё декларативная информация, сообщение относилось бы к процедурной информации, если его бы записали так: для умножения простых дробей нужно перемножить их числители и знаменатели. 2. декларативная – а и в (к варианту в то же замечание, что и в первом вопросе, если нужен только один ответ, тогда лучше записывать только а). варианты б, г, д – процедурная информация, они рассказывают, как достичь цели: удалить текущий файл, сократить дробь или найти корни квадратного уравнения.