Using System;
namespace ConsoleApp0{ class Program { static void Main(string[] args) { int a = int.Parse(Console.ReadLine()), b = int.Parse(Console.ReadLine()); if (a % b == 0 || b % a == 0) Console.WriteLine("Делится"); else Console.WriteLine("Не делится"); Console.ReadKey(true); } }}
Var
s:string;
max,min,i,k:integer;
begin
write('Введите строку: ');
readln(s);
s:=s+' ';
for i:=1 to length(s) do
begin
if s[i]=' ' then
begin
if k>max then max:=k;
if (k<min) or (min=0) then min:=k;
k:=-1;
end;
k:=k+1;
end;
writeln('Самое короткое: ',min,'; самое длиное: ',max);
<span>end.</span>
Отдельные группы в этих этаповспецилизируются на выполнении одного или нескольких этапов решении задач
Ответ: 96 Мб.
Объяснение:для начала найдем с какой скоростью передается файл.
Для этого 20:120=0,16 Мб/сек.
Теперь найдет размер файла за 10 мин. через это же соединение.
10мин.=600сек.
600×0,16=96Мб.
Ответ: 1,3
с1 получает целое число от деления.
с2 получает остаток от деления.
Потом просто выводятся через пробел.