Работник зарабатывает х руб. за каждые 38 часов своей работы. ему платят в 1,5 раза больше за каждый час сверх 38 часов. какую сумму он получит, если работает а часов (а должно быть заведомо больше 38).

Var a:   integer; var x, zp : real; label m; begin writeln('введите зарплату'); readln(x); m: writeln ('введите кол-во часов > 38'); readln(a); if a< 38 then goto m; zp: =x+1.5*(a-38)*(x/38); writeln ('работник получит ', zp,' рублей') end. 

если выполнить для стандартного алфавита с ё, й итд

получится

а-1 б-2 в-3 г-4 д-5 е-6 ё-7 ж-8 з-9 и-10 й-11 к-12 л-13 м-14 н-15 о-16 п-17

р-18 с-19 т-20 у-21 ф-22 х-23 ц-24 ч-25 ш-26 щ-27 ъ-28 ы-29 ь-30 э-31 ю-32 я-33

слово компьютер

к=12 -8=4 (д)

о=16-5=11(й)

м=14+1=15(н)

п=17+8=25(ч)

ь=30-23=7(ё)

ю=32-13=19(с)

тер (не меняем)

дйнчёстер

но я думаю делалось под алфавит без "ё" и "й" возможно в нем получится "винчестер"

а) наименование товаров, цена за единицу товара, количество каждого товара

б) общая сумма покупки, сумма денег переданная продавцу

в) программа телепередач, название фильма

г) набор значений углов и сторон треугольника, должна быть известна хотя бы одна сторона треугольника и еще две величины(углы или стороны)