|
0 / 0 / 1
Регистрация: 01.12.2010
Сообщений: 41
|
|
Проверить Zada4u19.12.2010, 18:07. Показов 446. Ответов 0
Метки нет (Все метки)
1.Сформируйте и выведите на экран массив из девяти элементов, каждые три последовательных элемента которого составлены по следующему правилу:
1-й равен текущему индексу; 2-й равен квадрату предыдущего элемента; 3-й равен целой части от деления предыдущего элемента на текущий индекс. program Norm1; Var A:array [1..100] of integer; i,k,x:integer; Begin Writeln ('Введите значение элемента массива'); Readln (x); k:=0; for i:=1 to 3 do Begin K:=K+1; A[k]:=K; K:=K+1; A[k]:=(k-1)*(k-1); k:=K+1; A[k]:= trunc (A[k-1]/k); end; for K:=1 to 9 do writeln ('A[',k,']=',A[k]); End. P.S. Проверьте программу к задаче.
0
|
|
| 19.12.2010, 18:07 | |
|
Ответы с готовыми решениями:
0
Проверить существование файла. Проверить содержание ячейки Как лучше проверить проверить на совместимость железо? |
| 19.12.2010, 18:07 | |
|
Помогаю со студенческими работами здесь
1
Функции. Проверить, простое число или нет. Увеличить его значение на натуральное число M. Проверить, осталось ли оно простым Проверить истинность утверждения: Квадрат заданного трехзначного числа равен кубу суммы цифр этого числа (проверить код) Проверить проверить Проверить БП Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
|
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию.
2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
|
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
|
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO
Апнулись до NET10.
Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта
так и в интерактивном режиме. из сложностей - чисто функциональный подход.
Решил. . .
|
|
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2.
Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники".
В. . .
|
Настройка движения справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии.
. . .
|
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2.
При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
|
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут.
https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc
Первый документ красиво выглядит, но без схемы.
Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
|