Составить программу в Паскале:
10-11 класс
|
Найти наибольшее целое n такое что :
a) 3n^4-730n<5
b) e^n-1000Ln*n<=10
var
n: real;
begin
n := 10000;
repeat
n := n - 1
until (3 * n * n * n * n - 730 * n < 5);
writeln(n);
end.
2)
var
n: real;
begin
n := 10000;
repeat
n := n - 1
until (exp(n) - 1000 * ln(n) <= 10);
writeln(n);
end.
Другие вопросы из категории
пакетный файл осуществляющий запуск одного из нескольких редакторов (notepad, edit и др.) для редактирования
требуемого файла.
Читайте также
пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
2. Составить программу для упорядоченное двух элементов по убыванию.
программу меняющихся местами первую и последнюю цифру.
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.