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

ответ 81, но у меня почему то выводит 1 var s,k: integer; begin s: =1; for k: =3 to 0 do s: =s*3; write(s); end. что неправильно?

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

Ответ:

Рауза1951

05.07.2020 19:20

Var s:integer;
Begin
S:=1;
For k:=3 to 6 do
s:=k*3
Writeln (s);
End.

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

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

Dark119277

16.07.2020 04:43

Заполни пропуски Компьютер по имени Джарвис играет с учениками в школе. Он настраивается наодну из восьми программ преобразования числовой или текстовой информации,...

nastya030513

06.08.2022 22:32

Опишите одну тайну по каждому виду тайн информационных ресурсов ограниченного доступа....

1298school

09.03.2022 02:52

Имеется графическое обозначение объекта. Выберите из предлагаемыхвариантов имя и свойства данногообъекта.Аквариум.jpgёмкость, размерзанятого/свободногопространства,...

никнейм85

03.10.2022 17:41

Нужно возвести число(любое) в четную степень n количество раз. например число 2 возводим в четные степень 2 в 2=4 2 в 4 =16 2 в 6=64 и тд....

Mystery322

03.10.2022 17:41

1. на одной улице стоят в ряд 4 дома, в которых живут 4 человека: алексей, егор, виктор и михаил. известно, что каждый из них владеет ровно одной из следующих профессий:...

Тотах

06.01.2022 18:36

Переведите 2180 в десятичной системе счисления во 2; 8; 16 надо...

Ananasikbeauti

06.01.2022 18:36

1.постарайтесь объяснить зачем компьютеру два вида памяти? внутренняя и внешняя? 2.что такое принцип хранимой программы? 3.в чем заключается свойство дискретности...

alenas000

19.01.2022 06:01

Найти объём информации,который содержится в книге из 130 страниц. 1 страница--2000 страниц,а мощность 256 надо сразу лучший !...

Котполиглот

26.03.2023 17:29

30 дан рекурсивный алгоритм procedure f(n: integer); begin writeln(n); if n 10 then begin writeln(n); f(n*2); f(n*n) end end; найдите сумму чисел, которые будут...

elenaveruaskina

04.01.2023 05:02

40 .всем доброго вечера), изменить начальную программу(в паскале). дано такое : дан одномерный массив. переставить в обратном порядке элементы массива, расположенные...

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

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