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

Площа земельної ділянки 28 га, її 25% засіяли пшеницею. Скільки гектарів ділянки не засіяно?

Ответы

Автор ответа: chelikhoroshiy
1

Ответ:

21 Га

Пошаговое объяснение:

28*1\4=7 Га (засеяли)

28-7-21 Га (не засеяли)

Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Русский язык, автор: 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 лет назад