Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
djodanosu7n8
15.02.2020 20:57 •
Информатика
Имеется набор карточек с числами среди которых есть 7. карточки перевернуты числами вниз. требуется определить на какой по счету карточке сверху находится 7
Показать ответ
Ответ:
sashaloxas
08.05.2023 04:48
While (tnum != 0) //tnum, tden - числитель и знаменатель искомой дроби
{
if (tnum < tden)
{
temp = tnum;
tnum = tden;
tden = temp;
}
tnum = tnum - tden;
}
gcd = tden; //вычисляем наибольший общий делитель
numerator = numerator / gcd; //делим числитель и знаменатель на
НОД, получаем сокращенную дробь
denominator = denominator / gcd;
0,0
(0 оценок)
Ответ:
66vdv1
16.04.2021 06:15
Vara,b,c,d,x1,x2: real;
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
then writeln('Не квадратное уравнение!')
else begin
d:= sqr(b)-4*a*c;
if d < 0 then writeln('Нет корней')
else begin
x1:= (-b+sqrt(d))/2*a;
x2:= (-b-sqrt(d))/2*a;
writeln ('X1 =',x1,' X2 =',x2);
end;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mandarinka377
03.07.2021 21:00
9. Что общего можно сделать на компьютере, используемом для совместного выполнения определенных документов удаленно? * А) компьютерные документы Б) Плагиат Б) общедоступные...
Y4ehik300
29.05.2023 11:06
Переведите десятичное число 58 в шестнадцатиричную систему счисления. * 3А2F5D3BПереведите число 707 из восьмиричной системы счисления в десятиричную. 185256455850Найдите...
nikgum
26.08.2022 22:47
4. Запишите условия на языке Python.Условия: Число a больше чем bЧисло b положительноеЧисло d не равно нулю...
сабо3
08.09.2020 03:35
Дан массив А[1,2-3,0,-6,6] на Эл укажите соответствующие характеристики массива 1) имя массива 2)индекс массива 3)элемент массива 4)значения элементов массива 5)размер...
aaysu228
09.02.2020 14:09
Разработать программный код для расчета значений функции y = x3-(x-1)2 на интервале [-1;10] с шагом приращения (изменения аргумента x) 0,5....
Яна116727
30.01.2020 22:46
Поле, значение которого однозначно определяет запись в таблице базы данных, называется А) внешнееБ) внутреннееВ) индексированное Г) ключевое ...
Элина1111111111112
25.05.2021 01:17
, не могу разобраться...
eliseyivanov9
22.10.2021 15:36
Приведите примеры, когда человек бессознательно совершает информационное правонарушение. Аргументируйте ответ....
superminikotik
20.07.2021 04:57
Для какого наибольшего целого неотрицательного числа А выражение (y+2x≠36)∨(A x) ∨ (A y) Тождественно истинно, то есть принимает значение 1 при любых целых неотрицательных...
trukit
17.02.2020 02:48
Информатика, программирование на языке Паскаль, нужно написать программу. Определить сколько платьев можно сшить из 100 м ткани. На платье уходит 80% роста. Рост 155-180....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
{
if (tnum < tden)
{
temp = tnum;
tnum = tden;
tden = temp;
}
tnum = tnum - tden;
}
gcd = tden; //вычисляем наибольший общий делитель
numerator = numerator / gcd; //делим числитель и знаменатель на
НОД, получаем сокращенную дробь
denominator = denominator / gcd;
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
then writeln('Не квадратное уравнение!')
else begin
d:= sqr(b)-4*a*c;
if d < 0 then writeln('Нет корней')
else begin
x1:= (-b+sqrt(d))/2*a;
x2:= (-b-sqrt(d))/2*a;
writeln ('X1 =',x1,' X2 =',x2);
end;
end;
end.