Их бесконечно , но вот код на С
#include <stdio.h>
int main ()
{
int i = 0;
for( ; ; )
{
if (i%2 == 0 && i%3 ==0) i++;
}
return 0;
}
=)
Пусть х - время в секундах.
Тогда
(1/3 * 60/8 мбайт/с * x) с - время за треть времени)
(2/3 * 90/8 мбайт/с * x) с - время за две третти времени
Тогда уравнение получается
1/3 * 60/8 * x + 2/3 * 90/8 * x = 9000
2,5x + 7,5x = 9000
10x = 9000
x = 900
Получается 900 секунд или 900/60 = 15 минут)
Ответ: плюсы экономия средств, надёжность и качество и выбор операционной системы. Минусы : гарантия, время.
1.
var a,z:integer;
begin
z:=1;
readln(a);
while a<>0 do
begin
if a<0 then z:=-z;
readln(a);
end;
if z=-1 then writeln('Произведение отрицательных чисел отрицательно')
else writeln('Произведение отрицательных чисел положительно');
end.
Пример:
12
-45
-87
-20
0
<span>Произведение отрицательных чисел отрицательно
2.
var n,a,x,s,i:integer;
begin
readln(n,a);
s:=0;
for i:=1 to n do
begin
readln(x);
if x>a then s:=s+x
end;
writeln('s = ',s);
end.
Пример:
5 30
48
15
80
29
32
<span>s = 160</span></span>
program asd;
uses crt;
var
a,b,c:integer;
begin
writeln('Введите 3 числа');
readln(a); readln(b); readln(c);
if (a<b) and (a<c) then
begin
writeln('Минимальное ', a);
end
else
begin
if (b<c) then writeln('Минимальное ', b)
else writeln('Минимальное ', c);
end;
end.
