Войти Регистрация Спроси ai-bota

Вычислить произведение p=1,11,21,3*1, с программы pascal. )!

Показать ответ

Ответ:

204448

16.09.2020 13:54

Var i,k:integer;
p:real;
begin
k:=1;
for i:=1 to 9 do
begin
p:=p*(1+(k/10));
k:=k+1;
end;
p:=p*2;
writeln(p)
end.

0,0(0 оценок)

Популярные вопросы: Информатика

jixecizagjixeci

02.05.2020 01:58

Роботтын кандай турлери бар?....

MariaGraf

08.10.2020 08:32

Что делать? Перестало работать телевидение пишет это :УВАЖАЕМЫЙ ЗРИТЕЛЬ! ТРАНСЛЯЦИЯ ВЕДЁТСЯ ТоЛЬкО для НАШИХ АБОНЕНТОВ. ЧТОБЫ СМОТРЕТЬ ПРОГРАММЫ, ФИльмы и СЕРИАЛЫ БЕЗ ОГРАНИЧЕНИЙ,...

Айхан1111111111

29.12.2020 18:32

Перевести число 2310в 16-ричную систему счисления:7171453...

Kat11166

14.05.2020 16:27

Составить таблицу истинности для логических функций: F(A,B)=A&B̅ F(A,B,C)=A&&̅ F(A,B,C,D)=̅VD&̅VB...

AknelaYouTuber

11.05.2022 14:18

Кроссворд на тему Рабочий стол....

Dashuli4ka2001

04.06.2022 15:15

Записать результат выполнения последовательности команд, если s,t,p-строковые величины и тд...

falendadmitry

29.08.2021 15:20

2. вычислите среднее арифметическое значение элементов двухмерного массива а(8*9), больших заданного числа q....

жмлпр

06.04.2020 05:31

Калькулятор ( ів) Лабіринт атракціону побудовано у вигляді квадрата який складається з N*N сегментів. Кожен з сегментів може бути порожнім, або заповненим камінням. Гарантується,...

liker27

23.07.2020 07:18

Язык для программирования C# Нужна по написанию программы, которая вычисляет частное двух чисел. Программа должна проверять правильность введенных пользователем данных и, если они...

nasibovschool

15.03.2021 11:58

Решите кроссворд По горизонтали:1. Философская наука, объектом изучения которой является мораль3. Юридический документ «Об информации, информатизации и защите информации»4. Одно...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку