Составить блок-схему алгоритма и программу на Паскале для вычисления функций z. Ввести программу в Паскале, вычислить значения функции и проверить ее для самостоятельно выбранных трех пар значений переменных X и Y.
var y: System.uint64; //Большая цЫфра же и положительная x, i: byte; //Нет смысла большие числа брать слишком, переполнение будет
begin readln(x); //Принимаем число... y := 1; i := 1; repeat y *= i; //...и умножаем такое-то количество раз i += 1; until (i > x); if (y = 0) then //Выводим, предусмотрев переполнение writeln('Слишком большая цЫферка') else writeln(y); end.
Int64 - это то же самое, что LongInt, а Uint64 (unsign long int) - длинное число без знака, при правильном использовании позволяет записывать в переменную числа, в 2 раза превышающие максимум Int64
В современной науке рассматриваются два вида информации: Объективная (первичная) информация — свойство материальных объектов и явлений (процессов) порождать многообразие состояний, которые посредством взаимодействий (фундаментальные взаимодействия) передаются другим объектам и запечатляются в их структуре. Субъективная (семантическая, смысловая, вторичная) информация – смысловое содержание объективной информации об объектах и процессах материального мира, сформированное сознанием человека с смысловых образов (слов, образов и ощущений) и зафиксированное на каком-либо материальном носителей.
program test;
const
e=2.71828;
var
z, x, y: real;
begin
write ('Введите значение х: ');
read (x);
write ('Введите значение y: ');
read (y);
if sqrt(x) + y > 10 then
z := sin(4*x*y)
else if sqrt(x) + y < 10 then
z := (-1 * x) + 2 * y
else z:= x-e;
write ('Функция z = ',z);
end.
Объяснение:
можно лучший ответ