Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.11.2018, 18:48   #1
Fresh6886
Новичок
Джуниор
 
Регистрация: 19.11.2018
Сообщений: 1
По умолчанию Квадратный корень, 8 класс

Yv2zE-knZog.jpg
Fresh6886 вне форума Ответить с цитированием
Старый 19.11.2018, 19:10   #2
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Тут не решатель задач. Если кто-то просто решит за вас, это вряд ли поможет вам разобраться.

покажите свои наработки, конкретные вопросы и т.п.
http://www.programmersforum.ru/announcement.php?f=31

Или в раздел Фриланс если вы не хотите ничего делать, а ищете кого-то, кто выполнит ваши задачи за вознаграждение.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 19.11.2018, 21:29   #3
Вадим Мошев

Старожил
 
Аватар для Вадим Мошев
 
Регистрация: 12.11.2010
Сообщений: 8,568
По умолчанию

Начните решать задачу самостоятельно. Если что-то не будет получаться, показывайте то, что сделали, задавайте конкретные вопросы.
Вадим Мошев вне форума Ответить с цитированием
Старый 20.11.2018, 16:06   #4
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,546
По умолчанию

Молодец! Лаконичность поражает. Даже слов не тратит: скан задачки - и "холопы, за работу!"
digitalis вне форума Ответить с цитированием
Старый 20.11.2018, 22:37   #5
saahriktu
 
Регистрация: 20.11.2018
Сообщений: 3
По умолчанию

Код:
program sqrt8; // имя программы
var // блок переменных
        y1, y2, a, b, c: Real; // вещественные переменные
begin
        write('a? '); // вывод вопроса
        read(a); // чтение переменной a
        write('b? '); // вывод вопроса
        read(b); // чтение переменной b
        write('c? '); // вывод вопроса
        read(c); // чтение переменной c
        // вычисления
        // sqrt() - это и есть извлечение квадратного корня
        // если b или c равно нулю вычислять y1 нет смысла
        if (b = 0) or (c = 0) then
                writeln('y1 отсутствует')
        else begin // иначе вычисляем
                y1 := a / (b + b / sqrt(b + c)) + b / (1 + 3 / (a + b / c));
                writeln('y1 = ' , y1:8:8 , ';'); // вывод результата
        end;
        // если a равно нулю вычислять y2 нет смысла
        if a = 0 then
                writeln('y2 отсутствует')
        else begin // иначе вычисляем
                y2 := 1 / a + 1 / (a + 1 / a) + 1 / (a + 1 / (a + 1 / a));
                writeln('y2 = ' , y2:8:8 , ';'); // вывод результата
        end;
end.
saahriktu вне форума Ответить с цитированием
Старый 21.11.2018, 11:19   #6
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,546
По умолчанию

А может, ему не на Паскале надо, а на SmallTalk или Ada ?
digitalis вне форума Ответить с цитированием
Старый 21.11.2018, 12:12   #7
saahriktu
 
Регистрация: 20.11.2018
Сообщений: 3
По умолчанию

Цитата:
Сообщение от digitalis Посмотреть сообщение
А может, ему не на Паскале надо, а на SmallTalk или Ada ?
Так тема вроде же в разделе Паскаля. Да и в школах, по ходу, Паскаль преподают.
Изображения
Тип файла: jpg screenshot1542791359.jpg (20.6 Кб, 132 просмотров)
saahriktu вне форума Ответить с цитированием
Старый 21.11.2018, 13:27   #8
Вадим Мошев

Старожил
 
Аватар для Вадим Мошев
 
Регистрация: 12.11.2010
Сообщений: 8,568
По умолчанию

Это сарказм был
Вадим Мошев вне форума Ответить с цитированием
Старый 21.11.2018, 13:29   #9
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Да ему уже ничего не надо

Цитата:
Последняя активность: 19.11.2018 18:13
Да и надо было наверняка на след. утро
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
квадратный корень от интеграла chainiksi Общие вопросы C/C++ 0 23.04.2012 23:37
Квадратный корень alex0097 Общие вопросы Delphi 4 24.03.2011 07:47
Вычислить квадратный корень Elfiniti Помощь студентам 7 02.02.2010 00:36
квадратный корень в с++ ben95 Общие вопросы C/C++ 9 09.02.2009 15:42
Корень квадратный BETONOMESHALKA Общие вопросы Delphi 2 01.11.2007 10:06