Помогите с обычный задачкой на паскальax=bТолько решите понятно, а не замысловатыми

Помогите с простой задачкой на паскаль
ax=b
Только решите понятно, а не замысловатыми решениями из института, задача с 10 класса

Задать свой вопрос
1 ответ
Var ax, b: integer;
begin
     readln(b);
     ax := b;
     writeln(ax);
end.

Если я правильно сообразил, то так)
Tatjana Beschasnova
не верно
Вавейкин Васек
А как правильно осознать?)
Степан
AX = b)
Konofenova Agata
Uses crt;Var x,a, b:real;beginreadln(b);readln(a);x:=b/a;writeln(x);if b=0 then a:=0;if a=0 then b:=0end.
Vitja Kuzchenko
А, вот оно что, понятно) Только если ввести a = 0, будет неудача-беда, сделай проверку)
Ромик Шалятов
я сделал робит все,
Natalja
Var a,x,b:real;Beginwrite('a,b: ');readln(a,b);x:=b/a;if (a=0)and(b<>0) then writeln('Решений нету')else if (a=0)and(b=0) then writeln('Бесконечно много решений')else writeln(x:0:2);End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт