Программиривание в котлин Найти произведение 5⋅6⋅7⋅...⋅13. Найти сумму 1+4+7+11+...+112.

в чем отличие пользователя от программиста если кто-то работает с компьютером, то это не значит, что он программирует или умеет программировать. пользователь потому и называется пользователем, что он просто использует возможности компьютеров и программ, и чаще всего далек от способов их создания. же программиста создавать программы для тех, кому они нужны, т. е. для пользователей. причем системные программисты в основном программы для компьютерами, а программисты прикладные , прежде всего, пишут программы полезные массовому пользователю. в принципе, всех, кто работает с компьютером можно разделить на три категории: 1. программисты, программы для облегчения труда других пользователей. 2. программирующие пользователи, которые программы для решения своих , облегчения собственного труда. 3. непрограммирующие пользователи, желающие решать свои , используя уже существующие программы, не занимаясь программированием.

если что-то будет не так - напиши, испралю. у меня простог нет возможности проверить, выполняется  

program string_7; var s: string; k,l,i: integer; begin write('введите строку: '); readln(s); k: =0; l: =0; for i: =1 to length(s) dobegin if s[i]='н' then k: =k+1; if s[i]='м' then l: =l+1end; writeln('н=',k); writeln('м=',l); if k> l then writeln ('больше букв н'); if k< l thenwriteln ('больше букв м'); if (k = 0) and (l = 0) thenwriteln ('таких букв нет'); end.

так будет элсе выкидывало бы что букв н больше, если бы ни м ни н не встретилось))

var

i: integer;

s: real;

m: array[1..2,1..6] of real;

begin

s: =0;

for i: =1 to 6 do

begin

readln(m[1,i]);

readln(m[2,i]);

s: =s+3.14*m[1,i]*m[1,i]*m[2,i]*1200;

end;

writeln(s);

end.