Популярные вопросы
- Нарисуйте 2 ромба с разной высотой, но с одинаковым периметром...
2 - look at the picture. describe the position of the animals using...
2 - Функция задана формулой f(x)=4x^2-x Найдите: 1) f(-2) и f(3) 2)...
2 - Запишите состав сплавов стали и победита: чугуна: мельхиор:Опишите...
1 - Какой объем кислорода (н.у.) необходим для полного сжигания 5 м³...
3 - Проверочная работа по теме деепричастие 7 класс вариант 1...
3 - На опытном поле посеяно 160 семян. Найти вероятность события, состоящего...
1 - Space Exploration вопрос*Put the sentences in the correct order...
1 - 1-тапсырма Теменде берілген бірыңғай мүшелерді пайдаланып, сөйлем...
3 - Салам алейкум Пацаны по-братски...
2
program chy;
Var x,a,b :real;
begin
write('a=');
read (a);
write('b=');
read(b);
if a<>0 then x:=-b/a;
Writeln ('x= ',x);
end.