С проверочными данными сами разбирайтесь...
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var a:=ArrFill(ReadInteger('n='),ReadInteger('m=')*60);
Range(1,a.Length-1).ForEach(t->begin a[t]:=a[t-1]+10 end);
a.Println; a.Sum.Println;
end.
Пример:
n= 5
m= 10
600 610 620 630 640
51 ч 40 мин
</span>
640 битов вроде бы если если цифры не подводят
Ответ:ночь - ноль - соль - сель - сень - день
рота - нота - нога - нора - пора - пола - полк
бант - рант - рана - раса - роса - коса
бег - бог - бок - бак - мак - рак - гак - маг - шаг
море - горе - гора - кора - кома - кума - пума - сума - суша
миг - мир - пир - пар - бар - бас - бес - вес - век
Объяснение:
Var skorost,pyt:real;
begin
writeln('Скорость равна = ');
read(skorost);
writeln('Путь равен = ');
read(pyt);
writeln('Время равно = ',pyt/skorost);
end.
Где таблица ааааааааааааааааааааааааааааа ?