Написать программу, Паскаль?

Информатика | 10 - 11 классы

Написать программу, Паскаль.

Дано натуральное число N.

Вычислить S = 1!

+ 2! + 3!

+ . + n!

(n> ; = 1) Решить через repeat (с постусловием).

Ответить на вопрос

Для ответа на вопрос необходимо пройти авторизацию или регистрацию.

Ответы (1)

Lubaruabova888 12 сент. 2020 г., 08:15:52

Var S, f : longint ; n, a : byte ;

begin

s : = 0 ; a : = 1 ; f : = 1 ;

readln(n) ;

repeat

f : = f * a ;

s : = s + f ;

inc(a) ;

until a> ; n ;

writeln(s) ;

end.

Вроде так.

Nastya132000 1 сент. 2020 г., 01:35:08 | 5 - 9 классы

Дано натуральное число?

Дано натуральное число.

Определить количество его нечетных делителей.

Написать программу паскаль).

Gevork65 8 июл. 2020 г., 03:50:21 | 10 - 11 классы

Циклы с постусловиями?

Циклы с постусловиями.

Разработать схему алгоритма и написать программный код на языке Паскаль.

Используя оператор Repeat Until.

VoinVasia 4 дек. 2020 г., 06:25:41 | 10 - 11 классы

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

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

Вычислить(см.

Картинку).

CamKo 22 мар. 2020 г., 10:05:22 | 5 - 9 классы

Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа?

Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа!

Sofiykas 5 июн. 2020 г., 20:18:17 | 10 - 11 классы

Даны натуральные числа m и n?

Даны натуральные числа m и n.

Получить число состоящее из m последних чётных цифр числа n.

Написать программу на Паскале только на Паскале.

Gubtamara 27 окт. 2020 г., 22:34:40 | 10 - 11 классы

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

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

Вычислить :

Vuqar244 7 февр. 2020 г., 11:38:14 | 10 - 11 классы

Дано натуральное число n?

Дано натуральное число n.

Вычислить у = 1 * 3 * 5.

* (2n - 1).

Составить программу на языке Паскаль.

CоNя 6 апр. 2020 г., 17:05:49 | 5 - 9 классы

Дано число?

Дано число.

Определить является ли оно простым.

Программа на паскале.

Напишите через while ИЛИ repeat.

Заранее спасибо).

Ryazanceva0303 28 мая 2020 г., 19:24:24 | 5 - 9 классы

Дано натуральное число ?

Дано натуральное число .

Определить есть ли в нем цифра а Написать с постусловием язык Паскаля !

Катюшка170212 27 сент. 2020 г., 04:27:12 | 5 - 9 классы

Написать программу в паскале?

Написать программу в паскале.

Дано натуральное число Х.

Найти сумму квадратов чётных цифр в числе.

Вопрос Написать программу, Паскаль?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 10 - 11 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.

Последние ответы

Fortunabee 17 мая 2024 г., 01:39:45

Ответ : Г В Б А Объяснение : 329. 161. 15. 50 (Точно не знаю)...

Петя записал IP - адрес школьного сервера на листке бумаги и положил его в карман куртки?

1981ва 16 мая 2024 г., 23:06:29

Найдем количество символов в статье : 50 * 40 * 70 = 140000 Информационный объём статьи составляет : 280000 байт = &nbsp ; 280000&nbsp ; * 8 = 2240000 бит На один символ&nbsp ; приходится : 2240000 / 140000 = 16 бит...

Помогите очень срочноопределить разрядность использование мой кодировки файлов который состоит из 50

Dolgopups 16 мая 2024 г., 18:48:34

Ответ : На каждый символ выделяется 6 бит Всего символов - 100 6 * 100 = 600 бит или 75 байт...

Текст составляет с пользование с использованием алфавита мощностью 16 символов и содержит 250 символ

Ridusik 16 мая 2024 г., 17:58:48

•1 А) •2 D) •3 А) Надеюсь я помогла вам...

1. Компьютерная анимация – это (1б)A) оживление, одушевление графических файловB) тестирование и отл

DmitryD7 16 мая 2024 г., 14:29:21

Г) 30. . ...

В ЭТ в ячейке A1 записано число 10,в B1 – формула = A1 / 2,в C1 – формула = СУММ(A1 : B1) * 2?

Катерина1421 16 мая 2024 г., 14:03:42

Var &nbsp ; s, a, n, i : integer ; &nbsp ; begin &nbsp ; s : = 0 ; &nbsp ; read(a, n) ; &nbsp ; for i : = 1 to n do &nbsp ; begin &nbsp ; &nbsp ; s : = s + a * i ; &nbsp ; end ; &nbsp ; &nbsp ; print(s) ; / / если надо end...

Плиз помогите, это паскаль?

Bombanur 16 мая 2024 г., 07:36:04

Ответ : import random a = [random. Randint( - 100, 100) for _ in range(10)] print('a = ', a) b = [i for i in a if i%2 - 1] print('b = ', b) Объяснение :..

Створити масив з 10 елементів?

Geijr12dfvs 16 мая 2024 г., 06:35:50

Ответ : перезапусти &nbsp ; комп Объяснение :..

Помогите пожалуйста, скинул до заводских настроек и пишет вот это, и мышки нет на экране и клавиатур

Elnur00kz 16 мая 2024 г., 06:17:42

/ / Pascal var &nbsp ; y, c, d, sum, neg : real ; begin &nbsp ; d : = 2 ; &nbsp ; c : = - 5 ; &nbsp ; while c &lt ; = 6 do &nbsp ; begin &nbsp ; &nbsp ; &nbsp ; y : = c - d ; &nbsp ; &nbsp ; &nbsp ; if y &lt ; 0 then &nbsp ; &nbsp ; &nbsp ; &nbsp ; &..

Найти результат вычисления арифметического выражения : Y = (c - d), где d = 2 c ∈ [ - 5 ; 6] с шагом

Яяяяя01 16 мая 2024 г., 01:50:41

1) function MaxArr(a : array of integer) : integer ; var i, l, ma : integer ; begin l : = high(a) ; ma : = a[0] ; for i : = 1 to l do if a[i]&gt ; ma then ma : = a[i] ; MaxArr : = ma ; end ; var a : array of array of integer ; i, j, l : integer ; beg..

Помогите пожалуйста людииимим надо срочно?