1) вводить три равных натуральных числа - треугольник равносторонний. Результат программы TRUE ⇒ программа работает корректно
2) вводить три неравных натуральных числа - треугольник не равносторонний. Результат программы FALSE ⇒ программа работает корректно
3) ввести три нуля - треугольник не существует. Результат программы TRUE ⇒ программа работает некорректно
4) вводить три равных отрицательных числа - треугольник не существует. Результат программы TRUE ⇒ программа работает некорректно
5) ввести три равных или неравных вещественных числа - треугольник существует. Результата программы нет (ошибка типов) ⇒ программа работает некорректно
120/20=6Мб можно передать за 1 сек
60*10=600сек в 10 мин
600/6=100Мб
Ответ: 100
Что именно нужно сделать?
Из компьютерной графики нам известно, что разрешение - это велечина, опредеющая кол-во точек(елементов рострового изображения) на еденицу площади или длины.
Program n1;
Uses Crt;
Var
c: array[1..10] of integer;
i, b, k:integer;Begin
for i:=1 to 10 do begin
c[i]:=random(40) - 20;
write(c[i]:4);
end;
writeln();
writeln('Enter B = '); Readln(b);
k:=0;
for i:=1 to 10 do if (c[i]<b) then k:=k+1;
writeln('Kol-vo iskomih chisel: ', k);
<span>End.</span>