М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

быстрее по информатике 9 класс найдите ошибки var a,b,c,D,x1,x2:real;
begin
writeln('введите a,b,c');
readln(a,b,c);
if a=0 thn if b=0 then if c=0 then writeln('x любое')
else writeln('нет решений')
ele begin
x1:=c/b;
writeln('x=',x1:12:6);
end
else begin
d:=bb-4ac;
if d>0 then begin
x1:=(-b-sqrt(D))/(2a);
x2:=(-b+sqrt(D))/(2a);
writeln('x1=',x1:12:6);
writeln('x2=',x2:12:6);
end
else if D=0 then bgin
x1:=-b/(2a);
writeln('x=',x1:12:6);
end
else write ln('нет решений,);
end;
readln;
end.

👇
Ответ:
маша200620
маша200620
25.10.2021

В 5 строчке надо было написать 'then', а написано 'thn'

В 7 строчке 'else' должно быть, а написано 'ele'

Строчка 'd:=bb-4ac' тоже неверная. Переменной bb не было, поэтому, кажется, должно быть b.

Там много ошибок, поэтому я немного подправила код. Но он всё равно не будет работать, потому что там используется конструкция if else неправильно (лучше ещё раз переписать код и как-то изменить эту конструкцию. там много else, а по правилам, к каждому if относится только одно else. Самостоятельно же else работать не может без if)

var a,b,c,D,x1,x2:real;

begin

writeln('введите a,b,c');

readln(a,b,c);

if a=0 then if b=0 then if c=0 then writeln('x любое')

else writeln('нет решений')

else begin

x1:=c/b;

writeln('x=',x1:12:6);

end;

else begin

d:=b-4ac;

if d>0 then begin

x1:=(-b-sqrt(D))/(2a);

x2:=(-b+sqrt(D))/(2a);

writeln('x1=',x1:12:6);

writeln('x2=',x2:12:6);

end;

else if D=0 then begin

x1:=-b/(2a);

writeln('x=',x1:12:6);

end;

else writeln('нет решений' );

end;

readln;

end.

4,6(8 оценок)
Открыть все ответы
Ответ:
vadimtolpegin
vadimtolpegin
25.10.2021

ССоздание новой пустой базы данных

1.В этой области из раздела Создание (New) выбрать элемент Новая база данных (Blank Database) (см. рис. 1.4). Появится диалоговое окно Файл новой базы данных (File New Database) с содержимым папки Мои документы .

2.В раскрывающемся списке Папка (Save in) открыть папку, в которой будет храниться создаваемая база данных, или выбрать папку одним из методов, описанных в разд. "Запуск Access и открытие баз данных" данной главы .

3,В поле ввода Имя файла (File name) указать имя создаваемого файла и нажать кнопку Создать (Create). По умолчанию Access присваивает новой базе данных имя dbl, а если база с именем dbl уже существует, то db2 и т. д. После нажатия кнопки появится окно новой базы данных

4,7(65 оценок)
Ответ:
Superpuper228911
Superpuper228911
25.10.2021

1) комплекс программ, обеспечивающий управление, аппаратными средствами компьютера.2) Определённый алгоритм задач , точное следование которым позволит организации получить продвижение устойчивой положительной репутации в целевой аудитории. 3)система новых программ на языке программирования. 4)программа для обнаружения вирусов.5)программа для сжатия без потерь одного или более файлов в файл-архив.6)устройство для набора, сохранения, редактирования и печатания текста.7) категория программного обеспечения , предназначенная для работы с электронными таблицами.8)программа , служащая для организации игрового процесса, связи с партнерами по игре, или сама выступающая в качестве партнера.

4,5(8 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ