Задание 1. Некоторая сумма денег выражена в копейках, например 317, 5050, 100. Записать данную сумму в гривнах и копейках, т. е. в виде: 3 грн. 17 коп., 50 грн. 50 коп, 1 грн. 00 коп. (Количество копеек всегда выражается дву...

var s,g,k:integer; begin writeln('Введите сумму (в копейках):'); readln(s); g:=s div 100; k:=s mod 100; write(g,' грн. '); if k=0   then writeln('00 коп.')  else if k<10 then writeln('0',k,' коп')               else writeln(k,' коп.'); end. Пример: Введите сумму (в копейках): 5205 52 грн. 05 коп