Напиши программу на языке паскаль вычислить n если значение n пользователь вводит с клавиатуры

Если n=1, то на экране выводится n!=

2) Запиши программу на языке Паскаль.

Определить, является ли число, введенное с клавиатуры простым.

Знаешь ответ?
Не уверен в ответе?

Найди верный ответ на вопрос ✅ «1) Проанализируй и напиши программу на языке Паскаль. Вычислить n!, если значение n пользователь вводит с клавиатуры. Если n=1, то на . » по предмету Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.

Новые вопросы по информатике

Сколько всего различных символов может быть в восьмибитной текстовой кодировке? 1) 8 2) 512 3) 256 4) 65536

Паскаль. Написать программу подсчета количества отрицательных чисел среди любых 10 вводимых. 1 программа с использованием while, 2 программа — repeat

Сколько кб информации содержит сообщение объемом 2^20 бит?

Информатика пользователь создад сообщение из 256 символов в кодировке Unicode в которой каждый символ кодируется 16 битами после редактирования информационный объем сообщения составил 3072 бит Определите сколько символов удалили сообщение если его

Нахождение суммы цифр вводимого с клавиатуры натурального трехзначного числа на языке Паскаль

Запишите числа в беззнаковом коде (формат 1 байт): а) 31; б) 163; в) 65; г) 128.

Главная » Информатика » 1) Проанализируй и напиши программу на языке Паскаль. Вычислить n!, если значение n пользователь вводит с клавиатуры. Если n=1, то на экране выводится n!= 2) Запиши программу на языке Паскаль.

Источник: urokam.net

Напиши программу на языке паскаль вычислить n если значение n пользователь вводит с клавиатуры

triolana

triolana 7 лет назад

Светило науки — 562155 ответов — 388270 раз оказано помощи

1:
var n:integer;otvet:real;
begin
writeln(‘Введи n:’);
readln(n);
otvet:=1;
for var i:=1 to n do otvet:=otvet*i;
writeln(‘n!=’,otvet);
end.

Читайте также:
Программа для сброса планшета на заводские настройки через компьютер

2:
var n:integer;otvet:real;prostoe:boolean;
begin
writeln(‘Введи n:’);
readln(n);
prostoe:=true;
for var i:=2 to n-1 do if n mod i = 0 then
begin
writeln(n, ‘ Не простое, делится на ‘,i);
prostoe:=false;
exit;
end;
if prostoe then writeln(n, ‘ Простое’);
end.

Источник: znanija.pro

Напиши программу на языке паскаль вычислить n если значение n пользователь вводит с клавиатуры

1)Проанализируй и напиши программу на языке Паскаль.
Вычислить n!, если значение n пользователь вводит с клавиатуры.

Если n=1, то на экране выводится n!=
2)Запиши программу на языке Паскаль.
Определить, является ли число, введенное с клавиатуры простым.

Ответ проверен экспертом
1 (77 оценок)

Вычисление площади и периметра прямоугольника в Паскаль

triolana

triolana 7 лет назад
Светило науки — 553134 ответа — 388270 раз оказано помощи

1:
var n:integer;otvet:real;
begin
writeln(‘Введи n:’);
readln(n);
otvet:=1;
for var i:=1 to n do otvet:=otvet*i;
writeln(‘n!=’,otvet);
end.

2:
var n:integer;otvet:real;prostoe:boolean;
begin
writeln(‘Введи n:’);
readln(n);
prostoe:=true;
for var i:=2 to n-1 do if n mod i = 0 then
begin
writeln(n, ‘ Не простое, делится на ‘,i);
prostoe:=false;
exit;
end;
if prostoe then writeln(n, ‘ Простое’);
end.

Источник: vashurok.com

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru