Задачи в паскале.
Задача 1.
Посчитайте количество четырехзначных чисел, кратных 9.
Первоначальное значение K=0. Начальное значение параметра цикла равно 1000, конечное
значение равно 9999. Внутри цикла организовать проверку условия: кратно ли число девяти (если
остаток от целочисленного деления на 9 равен нулю, то число кратно 9). Использовать формулу
подсчета количества.
Задача 2.
Вы должны другу 4000 рублей. Он предлагает выплатить ему долг следующим образом: в
первую неделю – 1 руб, во вторую – 2 руб, в третью – 4 руб, в четвертую – 8 руб и т. д. в
течении 12 недель. Выгодно ли вам такое предложение? Какую сумму вы выплатите таким Первоначальное значение S=1 (S – сколько руб выплачивает за t недель), X=1 (X – сколько руб
выплачивает в неделю). Начальное значение параметра цикла равно 2, конечное значение равно
12. Использовать формулу подсчёта суммы. После выполнения цикла сравнить полученную
сумму (переменную S) с числом 4000 и дать ответ выгодно ли вам такое предложение.

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

Ответ:

Rock2015

20.05.2020 01:21

Наверняка каждый пользователь, хорошо знаком с термином «операционная система». Однако, далеко не все имеют полное понятие, что же это такое.

Итак, что такое операционная система — это определённый набор программ (её часто ещё называют программной оболочкой), которые устанавливаются в базовой версии на любые компьютеры, смартфоны или же носимые гаджеты. При этом, в пакет программ входят различные драйвера, а также программное обеспечение, позволяющее распознавать видеокарту, мышь, жёсткий диск и прочее.

Каждая операционка обладает своим собственным интерфейсом. Пользователи могут устанавливать дополнительное программное обеспечение, позволяющее адаптировать работу устройства под свои нужды. Другими словами, именно наличием этой системы обеспечена многофункциональность любых устройств.

Объяснение:

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

Ответ:

Ariya03

11.02.2022 01:13

Var a: array[1..20,1..20] of integer; n,m,i,j,min,jm,x: integer; begin randomize; write('Введите размеры массива: '); readln(n,m); writeln('Исходный массив:'); for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(19)-9; write(a[i,j]:4); end; writeln; end; min:=0; for i:=1 to n do min:=min+a[i,1]; writeln('Сумма элементов 1-го столбца = ',min); jm:=1; for j:=2 to m do begin x:=0; for i:=1 to n do x:=x+a[i,j]; writeln('Сумма элементов ',j,'-го столбца = ',x); if x<min then begin min:=x; jm:=j; end; end; writeln('Минимальная сумма в ',jm,'-м столбце'); writeln('Полученный массив:'); for i:=1 to n do begin for j:=1 to m do begin if j<>jm then a[i,j]:=a[i,jm]; write(a[i,j]:4); end; writeln; end; readln; end.

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

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