<em>// PascalABC.NET 3.2, сборка 1362 от 14.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
procedure Love(n:integer);
begin
Writeln(n*('Я люблю ПАСКАЛЬ'+NewLine))
end;
begin
Love(ReadInteger('n='))
end.
<u>Пример</u>
n= 5
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
Я люблю ПАСКАЛЬ
<em>// PascalABC.NET 3.2, сборка 1362 от 14.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
procedure LinEqu(a,b:real);
begin
if a=0 then
if b=0 then Writeln('Решений бесконечно много')
else Writeln('решений нет')
else Writeln('x=',-b/a)
end;
begin
var a,b:real;
Write('Введите а и b: '); Read(a,b);
LinEqu(a,b)
end.
<u>Пример</u>
Введите а и b: 18.45 -12
x=0.650406504065041
Ответ:
25
Объяснение:
Время на передачу упакованного файла составляет 15 - 5 = 10 секунд.
Неупакованный файл передается за 40 с, т .е. в 40 / 10 = 4 раза быстрее.
Следовательно, объем упакованного файла в 4 раза меньше и составляет 100 / 4 = 25 Мбайт.
а) 2 и 10 ................................................................
нота кодируется минимум тремя битами. значит 180 нот - 540 бит
1) x=256
2) x=2
3) хз)))
2)Алгоритм-система последовательных операций (в соответствии с определёнными правилами) для решения какой-н. задачи.
Исполнитель - это некоторая абстрактная или реальная (техническая, биологическая или биотехническая) система, способная выполнить действия, предписываемые алгоритмом.
Свойства Алгоритма - Дискретность, Определенность, Результативность, Массовость.
