Информатика | 10 - 11 классы
Помогите составить программы для первых двух заданий срочно (вариант 5)в паскале.
Помогите ?
Помогите !
Паскаль!
ИНФОРМАТИКА!
Составить программу , находящую сумму и произведение трёх чисел !
Дано число его удвоить и утроить составить программу в паскаль?
Дано число его удвоить и утроить составить программу в паскаль.
Составить программу, которая вводит три числа и печатает сумму двух наибольших?
Составить программу, которая вводит три числа и печатает сумму двух наибольших.
Срочно пожалуйста!
Помогите составить программы в паскале в 2 - х заданиях 5 вариант(в табличке13)?
Помогите составить программы в паскале в 2 - х заданиях 5 вариант(в табличке13).
Помогите составить программы для третьего и четвертого заданий срочно (вариант 5) в паскале?
Помогите составить программы для третьего и четвертого заданий срочно (вариант 5) в паскале.
Помогите пожалуйста составить программу Паскаль 6n = 5 m = 4?
Помогите пожалуйста составить программу Паскаль 6
n = 5 m = 4.
Набрать в паскале программу флага помогите пожалуйста?
Набрать в паскале программу флага помогите пожалуйста.
Помогите составить программу в паскаль?
Помогите составить программу в паскаль!
Помогите составить эти программы на паскаль?
Помогите составить эти программы на паскаль.
ПОЖАЛУЙСТА СРОЧНО?
ПОЖАЛУЙСТА СРОЧНО!
НОМЕР 5 а если нет то 6 программу и алгоритм.
ПАСКАЛЬ.
Вы находитесь на странице вопроса Помогите составить программы для первых двух заданий срочно (вариант 5)в паскале? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 10 - 11 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Const a = - 10 ; b = 1 ;
var i : integer ;
begin for i : = a to b do writeln('F1(', i, ') = ', 1 / Tan(i)) ;
end.
Const a = 2 ; b = 10 ;
var i : integer ; x, f, min, max : real ;
begin
x : = a ;
min : = power(x, 3 / 5) ;
max : = min ;
for i : = a to b do begin x : = i ; f : = power(x, 3 / 5) ; writeln(f) ; if fmax then max : = f ; end ;
writeln('min = ', min) ;
writeln('max = ', max) ;
end.