Решить на паскале в каждом стакане (200 мл) компота должно быть n граммов сахара. сколько граммов сахара нужно засыпать в трёхлитровую банку? решить !

Const glass = 200;
var n, bottle: integer;

begin
write("Введите кол.-во сахара на стакан в граммах:");
read(n);

bottle = glass*15*n;

writeln(Кол.-во сахара на бутылку объёмом 3л. равняется ", bottle);

end.

Александр Есенин
Жили – были  клавиатура, монитор, память и  процессор. Жили  они  дружно,  пока  не  возник у  них спор, кто  из них  главнее.
   Клавиатура  говорит:
- Я  главнее, чем  вы.  Я  нужна  для ввода  числовой  и   текстовой   информации.  Я  имею  104  клавиши   и  3  световых   индикатора  в  правом  верхнем  углу,  информирующих   о  режимах  работы.  У  меня   есть  несколько  групп  клавиш:  алфавитно-цифровые,  клавиши   редактирования  и  листания  документов,  управления   курсором,  специальные,  функциональные,  Windows – клавиши, цифровой  блок,  клавиши  управления  питанием.  Без  меня  вы  не  сможете  ввести  информацию,  даже  на  калькуляторе   не  посчитаете,  т.к.  цифры  я  ввожу – то.
- Да, это  ты  права, - говорит монитор. – Но  я  всё  равно  главнее.  Смотрите,  если   информация  вводится   при клавиатуры,  то  где  она  выводится?  Я, я, а  не  она  являюсь   универсальным  устройством  вывода  информации.  Информация   на   моём  экране  представляется      в  виде  растрового  изображения,  которое  формируется   из  отдельных   точек   (пикселей). Качество  изображения  определяется   моей  разрешающей Так что главный  только  я!
- Куда тебе! – говорит  память. – Я самая  главная. Данные  и  программы  хранятся  в  оперативной (внутренней) памяти, т. е.  во   мне. Я   представляю   собой   последовательность  пронумерованных,  начиная  с  нуля,  ячеек.  Мой   объём  можно  определить  по  формуле Jоп.=Jяч.  •  N .  А  у  вас  так  нельзя!  Меня  называют  «мозгом»!   Значит,  я  главная!
-  Вас  послушаешь, я  вообще  тогда не  нужен!  А  на  самом – то  деле,  я  ведь  самый  главный!  Я, процессор!  Я  центральное  устройство  компьютера,   которое  обрабатывает  данные  в  соответствии  с  заданной  программой.  Я  со  всеми  вами  работаю. Я  самый  главный!
-Нет, я!
-Нет, я!
-Нет, я!
-Нет, я!
А  человек  спор  слышал  и  сказал: 
-Что  вы  спорите?  Вы  же  сами  ответили  на  вопрос,  кто  из  вас  главнее!
-Мы  ответили?
-Вы. Главные  вы  все. Только в  совокупности, когда  вы  все  вместе, компьютер  будет  работать! Кто  будет  вводить  информацию, если  не   клавиатура, и  выводить, если  не  монитор?  Кто  будет  хранить  её,  если  не  память? Кто  будет  обрабатывать данные  в  соответствии с  заданной  программой,  если  не    процессор?    Не  знаете? Вот! Так  что  вы  зря спорите.  Ведь  главные  вы   все!
Подумали  клавиатура, монитор, память  и  процессор  и  помирились. С  тех  пор  они  живут  счастливо. Ведь  сила  их – в  единстве! 

1. Треугольник будет существовать если будут выполнятся одновременно три неравенства:
x + y > z
x + z > y
y + z > x

Программа:

var x, y, z: real;
begin
  writeln('Введите стороны треугольника x, y, z: ');
  read(x, y, z);
  if (x + y > z) and (x + z > y) and (y + z > x) 
  then writeln('Треугольник существует')
  else writeln('Треугольник не существует');
end.

2. Думаю, здесь излишни объяснения.

Программа:

var x, y, z: real;
begin
  writeln('Введите три числа: ');
  read(x, y, z);
  writeln('В интервале (1; 3) лежат числа: ');
  if (x > 1) and (x < 3) then writeln(x);
  if (y > 1) and (y < 3) then writeln(y);
  if (z > 1) and (z < 3) then writeln(z);
end.

Блок-схемы в приложении: