Предмет: Математика, автор: annasafronenko13

плиз помощь,очень надо​

Приложения:

Ответы

Автор ответа: Naadipp
0

1) 20х+36у-4z

2) 6а+48b-42с

3) -2,6u-v+1,4w (ничего не меняется)

4) -14x-12y

Автор ответа: nokia6696
0

Ответ:

20х +36у - 4з. 2) 6а-48б-42с. 5) -2.6u-u+1.4w. 6) -14x-12y

Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Русский язык, автор: aizada13467
Прочитай текст. Сделай вывод о функциях мягкого знака.
1 год назад
Предмет: Окружающий мир, автор: artikbuldakov
почему рожь так назвали
1 год назад
Предмет: Окружающий мир, автор: рамизат
помогите как можно предотвратить выдувание почвы на полях уже 2 часа делаю
1 год назад
Предмет: Информатика, автор: Overlord21
Паскаль ABC Хочу сделать так, что бы если человек писал Да, то программа предлагала бы ему ввести значения снова, а она пропускает строку 'Введите коффициент а' и если человек отвечает Нет или пишет еще что то, она выдавала фразу в конце( Спасибо за использование). Что я сделал не так?
program Pr1;

const
H = 'Здравствуйте, ';
var
a,b,c,d: real;
name: string;
t: boolean;
Begin
writeln('Введите свое имя:');
readln(name);
writeln(H, name, ', вас приветствует программа-калькулятор квадратного уравнения' );
writeln('Введите коеффициент "a"');
readln (a);
writeln('Введите коeффициент "b"');
readln (b);
writeln('Введите коeффициент "c"');
readln (c);
d := b*b-4*a*c;
if d=0 then
begin
writeln ('X1,X2 =', (-b+sqrt(d)/(2*a)));
end;
if d<0 then
begin
writeln ('D<0, корней нет');
end;
if d>0 then
begin
writeln('D = ', b*b-4*a*c);
writeln ('X1 =', (-b+sqrt(d)/(2*a)));
writeln ('X2 =', (-b-sqrt(d)/(2*a)));
end;
writeln ('Хотите воспользоваться калькулятором еще раз? Введите T(Да)\F(Нет)');
readln;
if t then
writeln('Введите коеффициент "a"');
readln (a);
writeln('Введите коeффициент "b"');
readln (b);
writeln('Введите коeффициент "c"');
readln (c);
d := b*b-4*a*c;
if d=0 then
begin
writeln ('X1,X2 =', (-b+sqrt(d)/(2*a)));
end;
if d<0 then
begin
writeln ('D<0, корней нет');
end;
if d>0 then
begin
writeln('D = ', b*b-4*a*c);
writeln ('X1 =', (-b+sqrt(d)/(2*a)));
writeln ('X2 =', (-b-sqrt(d)/(2*a)));
end
else
writeln ('Спасибо за использование');
end.
8 лет назад
Предмет: Русский язык, автор: Waleria1289
Тяжёлые валы нальются безысходности яростью,заревут,загрохочут. Сделайте пожалуйста части речи
8 лет назад