Дана цена одной чашки кофе. Ввести количество заказанных чашек кофе, вычислить стоимость заказа и вывести ее на экран ( ) Результат вывести в виде: Цена чашки кофе – 150 руб. Стоимость оплаты за 3 чашки составляет 450 руб.

а самому подумать вообще ни как?

АВБ (19.12.193.69).

Объяснение:

1) Каждое из четырех чисел IP не должно превышать 255. Адрес не может начинаться с точки. В качестве 1 фрагмента нельзя использовать Б.  

2) Фрагмент В тоже не может быть первым, так как полученные комбинации будут больше 255. (12.193.6919.)-здесь только 3 числа. И последнее больше 255 и заканчивается точкой. Неправильно. (1219,193,69). Здесь тоже 3 числа и первое больше 255.  

3) Остается на первое место фрагмент А. На второе фрагмент В, так как две точки подряд не могут идти. На третье- Б.  

АВБ (19.12.193.69). Все числа меньше 255.  

Const
  nn=100;

var
  i,n,d:integer;
  a:array[1..nn] of integer;

begin
  Write('n = '); Read(n);
  Randomize;
  d:=0;
  for i:=1 to n do begin
    a[i]:=Random(21)-10;
    Write(a[i],' ');
    if a[i]>0 then d:=d+1
    else
      if a[i]<0 then d:=d-1
    end;
  Writeln;
  if d>0 then Writeln('Положительных чисел больше')
  else
    if d<0 then Writeln('Отрицательных чисел больше')
    else Writeln('Положительных и отрицательных поровну')
end.

Пример
n = 13
-1 -5 3 -3 -4 -8 1 6 4 7 -7 10 7
Положительных чисел больше