1)285Кб
2)5 - но могу и ошибиться)
Блок-схема (с циклом) - в прилагаемом файле.
Программа (с циклом):
var n,m,m1,s,i:integer;
begin
readln(n,m);
m1:=m*60;
s:=m1;
for i:=2 to n do
begin
m1:=m1+10;
s:=s+m1
end;
writeln('s = ',s div 60,' час ',s mod 60,' мин');
end.
Пример:
5 2
<span>s = 11 час 40 мин</span>
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var A:='Аэродинамика';
A[5:].Println;
A[5:12].Println;
(A[9]+A[12]+A[3]+A[6:9]+A[5]).Println
end.
<h2>Пример</h2><h3>динамика</h3><h3>динамик</h3><h3>маринад</h3>
I = 20 байт = 20 * 8 = 160 бит
n = 160/16 = 10
Получается слово занимает 10 символов (Не забываем про пробел и запятую ⇒ 10-2=8 символов - из этого кол-ва состоит слово)
Ответ: ласточка
Август
Апрель
Декабрь
Июль
Июнь
Май
Март
Ноябрь
Октябрь
Сентябрь
Февраль
Январь