Сергеевич1396
?>

3. Дан целочисленный массив, заданный датчиком случайных чисел в интервале от 20 до 55. Найти минимальный элемент и его индекс. Решить в Pascal

Информатика

Ответы

nsn-2012

PascalABC.NET 3.5.1 + .NET Framework 4.7.1

begin

  var A := ArrRandom(10, 20, 55);

  A.Println;

  A.Min.Println;

  A.IndexOf(A.Min).Println;

end.

Объяснение:

armusaeff

ОбъЗадача. Гражданка А.О. 1 марта 2018 открыла счёт в банке, вложив 1000 рублей. Через каждый месяц размер её вклада увеличивается на 2% от имеющейся суммы. Определить: Сумму вклада через один, два, …, двенадцать месяцев.

Построение математической модели решения:

Первоначальный вклад а0=1000

1 месяц: а1=а0+а0*0,02

2 месяц: а2=а1+а1*0,02

10 месяц: а10=а9+а9*0,02

Общий случай: an=an-1+an-1*0,02

Составим программу и протестируем ее. Программа составляется совместно с ребятами на доске.

Program vklad;

Var i: integer;

a: real;

Begin Writeln (‘введите значение первоначального вклада’);

Readln (а);

i:=1;

while i<=12 do

begin a:= a+a*0,02;

writeln (a);

i:=i+1; end;

end.

Задачу вводим в паскаль и тестируем.

- Хорошо, задачу решили, а теперь поиграем с ней.

- Назовите банки в Перми, которые вы знаете или там имеют вклады ваши родители? (сбербанк)

обяснение:

ну в жизни пригодится я думаю

Shitikov-M.A.1307

Системы программирования -это система для разработки новых программ на конкретном языке программирования. Современные системы программирования обычно предоставляют пользователям мощные и удобные средства разработки программ.

Язык программи́рования — формальный язык, предназначенный для записи компьютерных программ. Язык программирования определяет набор лексических, синтаксических и семантических правил, определяющих внешний вид программы и действия, которые выполнит исполнитель (обычно — ЭВМ) под её управлением.  

Объяснение:

извини если поздно

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

Поделитесь своими знаниями, ответьте на вопрос:

3. Дан целочисленный массив, заданный датчиком случайных чисел в интервале от 20 до 55. Найти минимальный элемент и его индекс. Решить в Pascal
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

suhanowaswetlana
makarov021106
academycoffee243
artem-whitenoise142
kristeisha871
vasearu
kashxb2056
ilyatamurov
iuv61
buhh20104519
yurovolga
suxoruchenkovm171
Dmitrychekov9
cetarbkilork82
nagas