Напишисат программу которая вычисляет y=3x

// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('y=',3*ReadReal('x='))
end.

Примеры
x= 15
y=45

x= 3.18
y=9.54

x= -17.32423
y=-51.97269

var a, b, c, d, min, max: integer;

begin

 // Min

 readln(a, b, c, d);

 if (a <= b) and (a <= c) and (a <= d) then min := a

 else if (b <= a) and (b <= c) and (b <= d) then min := b

 else if (c <= a) and (c <= b) and (c <= d) then min := c

 else if (d <= a) and (d <= b) and (d <= c) then min := d;

 // Max

 if (a >= b) and (a >= c) and (a >= d) then max := a

 else if (b >= a) and (b >= c) and (b >= d) then max := b

 else if (c >= a) and (c >= b) and (c >= d) then max := c

 else if (d >= a) and (d >= b) and (d >= c) then max := d;

   

 writeln('Min: ', min);

 writeln('Max: ', max);

end.

Уровень A.

1. Процессор;
2. Тачпад;
3. Floppy disk;
4. Файл;
5. На тип данных, хранящихся в нем;
6. Презентация;
7. rtf, doc, docx, txt;
8. Служит для размещения данных и промежуточных результатов вычислений в процессе работы ПК, а также размещения программ;
9. Комплекс программ ПК, управляющих его работой и обеспечивающих эффективное использование ресурсов системы;
10. На системное, прикладное, системы программирования;

Уровень B.

1. fami-ly.jpg, car.bmp, dog.gif;
2. Монитор, принтер, клавиатура, флэш-память, колонки;
3. Дискета, CD-ROM, DVD-ROM, жесткий диск;
4. Принтер, колонки, веб-камера, флэш-память, наушники.
5. а, г, д, е;

Уровень C.

1. D:\HOME\HELP\readme.txt;
2. Ване не стоит брать диски 2 и 3, т.к.:
-второй диск имеет частоту 2ГГц, превышающая тактовую частоту компьютера;
-третий диск имеет больший объем ОП, чем его компьютер.