Программирование 11 класс

0 голосов
31 просмотров

Программирование 11 класс


image

Информатика (1.5k баллов) | 31 просмотров
0

2 желательно

0

2 номер

0

uses crt;var a,b,x: real;beginwriteln('Введите число а');readln(a);writeln('Введите число b');readln(b);if a=0 then writeln('Решений нет') elsebeginx:=-(b/a);writeln(x);end;end.

Дан 1 ответ
0 голосов
Правильный ответ

2
uses crt;
var a,b,x: real;
begin
writeln('Введите число а');
readln(a);
writeln('Введите число b');
readln(b);
if a=0 then writeln('Решений нет') else
begin
x:=-(b/a);
writeln(x);
end;
end.

(1.4k баллов)