Напишите программу, # которая получает от пользователя число X и вычисляет значение функции Y

# Напомним, как это работает:
# Если X больше нуля Y = X - 12.
# Если X равных нулю Y равен пяти.
# Если X меньше нуля Y равен квадрату X.

№1

ответ: WinRar.

Пояснение: WinRar - архиватор, поддерживающий большое количество расширений архивов.

№2

ответ: Internet Explorer, MS Excel*, MS PowerPoint*.

Пояснение:

Internet Explorer - браузер от Microsoft, установленный на устройствах с Windows по умолчанию. Является системным.MS Excel (Microsoft Office Excel) - программа для работы с электронными таблицами. Входит в набор приложений Microsoft Office.MS PowerPoint (Microsoft PowerPoint) - программа для работы с презентациями. Входит в набор приложений Microsoft Office.WinZip - архиватор (если честно, про него не слышал). Не входит в набор системных программ Windows.C++ - это даже не программа, а язык программирования. Не подходит.Inkscape - редактор векторной графики. Не входит в набор системных программ Windows.

* Вообще, я не уверен насчёт того, что они прям входят в набор системных программ, так как MS Office не всегда предоставляется вместе с Windows. Но, поскольку тут нужно несколько вариантов ответа, то, думаю, это подходит больше всего.

//Общее сопротивление сети: 
// 1/R = 1/r1 + 1/r2 
// 1/R = (r2+r1)/(r2*r1) 
// R = r2*r1 / (r2 + r1) 
//Закон Ома для участка цепи: 
// I = U/R  

var   
r1,r2,u : integer;   
R,I : real;    

begin 
writeln ('Введите значения сопротивления (r1 r2)'); 
readln (r1,r2); 
writeln ('Укажите напряжение на концах цепи (u)'); 
readln (u);   

R := r2*r1 / (r2 + r1); 
I := U/R;   

//Фактически можно не использовать переменную R 
//А вставить выражение сразу     
//    I := U/( r2*r1 / (r2 + r1) );       

writeln ('Сила тока на участке = ',I); 
end.