1. Оцените возможность продвижения стартапа и заполните таблицу продвижения стартапа

достоинства

недостатки

9. 1312 Кбайт

10. 14 сек.

Объяснение:

9. Передача велась 42 секунды со скоростью 256000 бит/с, следовательно, было передано 256000 * 42 бит информации. Для перевода в Кбайт, полученное число необходимо поделить на 8 (бит -> байт) и на 1024 (байт -> Кбайт).

Размер файла: 256000 * 42 / 8 / 1024 = 1312,5

10. Варианта два: перевести скорость в Кбайт или объем сообщения из Кбайт в биты.

Воспользуемся первым вариантом: 128000 / 8 / 1024 = 15,625 Кбайт/с.

Время передачи составило: 229 / 15,625 = 14,656 сек.

№1

var sum, i: integer;
begin
sum := 0;
for i := 1 to 100 do
sum := sum + i;
writeln('Сумма всех чисел от 1 до 100: ', sum);
end.

№2

var p, i: integer;
begin
p := 1;
for i := 1 to 10 do p := p * i;
writeln('Произведение всех чисел от 1 до 10: ', p);
end.

№3

У вас не дано никаких условий. Вот задача для условия: "Членов прогрессии - 100, шаг - 3"

var A, i, k, max: integer;
begin
i := 3;
max := 100;
for k := 1 to max do begin
A := A + i;write( A, ' ');
end;
end.

№4

var sum, x: real;
a: array[1..10] of real;
i: integer;
begin
sum := 0;
for i := 1 to 10 do begin
write('Введите ', i, ' число: ');
readln(a[i]);
sum := sum + a[i];
end;

writeln('Сумма введенных чисел: ', sum);
end.