Program morebrains;
const
n = 12; {Количество элементов массива}
var
F:array[1..n] of integer;
s:string;
i,sum:integer;
begin
s:='**** -=Alphaeus=- ****';
for i:=1 to 22 do begin write(s[i]); sleep(42) end;
{заполняем массив}
writeln;
for i:=1 to n do F[i]:=i*i-5*i-14;
{Ищем сумму положительных}
sum:=0;
for i:=1 to n do
if F[i]>0 then sum:=sum+F[i];
{Выводим сумму}
writeln;
writeln('Сумма положительных элементов равна ',sum);
end.
Страница в Word - это пустая страница чтоб её добавить
World - это приложение 《Microsoft world》в компьютере
я думаю что поняла ваш вопрос...и ответила правильно
Начало
Присвоить С=14
Метка1: Если C>130 Тогда ВЫХОД
С=С+1
Вывод С
Вывод Символ ':'
Вывод 1,8*C+32
Вывод Символ перевода строки
Перейти Метка1
Ответ:
10 с
Объяснение:
Поскольку скорость дана в бит/с, объем информации нужно перести в биты.
В одном байте 8 бит, поэтому количество байт умножаем на 8.
Получаем 125 × 8 = 1000 бит.
Если за секунду передается 100 бит, то на всю передачу будет затрачено 1000 / 100 = 10 секунд