Берешь сначала h, затем h-36%, и так делаешь, пока h не будет = 0, затем складываешь все результаты и получаешь ответ
Это произведение
var p,i:integer;
begin
p:=1;
for i:=2 to 11 do
p;=p*i;
writeln (p);
end.
Это подсчёт i
var k,i:integer;
begin
k:=0;
for i:=2 to 11 do
k;=k+1i;
writeln (k);
end.
сумму не понятно чего?
Мало данных для решения... Главное - размер пробоины и размер листа стали...
<span>для представления информации при:
1)записи арифметических выражений - используются цифры, знаки арифметических операций (+ , - , *, /)
2)записи мелодий - ноты
3) записи звуков речи - буквы алфавита
4) оформление календаря погоды - пиктограммы (картинки):солнечно, пасмурно, дождь и т.д.</span>