Алг
нач
цел N = 5
цел i, index
вещ minimum
вещтаб mas[1:N]
вывод "Введите 1 элемент: "
ввод mas[1];
mas[1] := mas[1] * 2
minimum := mas[1]
index := 1;
нц для i от 2 до N
вывод "Введите ", i, " элемент: "
ввод mas[i]
mas[i] := mas[i] * 2;
если mas[i] < minimum то
minimum := mas[i]
index := i;
всё
кц
вывод нс, "Обработнный массив:", нс, нс
нц для i от 1 до N
вывод "Элемент ", i, " = ", mas[i], нс
кц
вывод нс, "Минимальный элемент: A[", index, "] = ", minimum
кон
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var n:=ReadInteger('Кол-во элементов:');
var a:=ArrRandomReal(n,-10,20); a.Println;
Writeln('С округлением если |x|<1');
for var i:=0 to n-1 do
if abs(a[i])<1 then a[i]:=Round(a[i]);
a.Println
end.
<u><em>Тестовое решение:</em></u>
Кол-во элементов: 10
-0.751956142835299 5.95022566427953 3.58861613254464 7.42331713783709 -4.75036238075717 -9.41228387384316 -0.700975591643235 3.85500546258642 -1.94321916994789 19.3021338336645
С округлением если |x|<1
-1 5.95022566427953 3.58861613254464 7.42331713783709 -4.75036238075717 -9.41228387384316 -1 3.85500546258642 -1.94321916994789 19.3021338336645
A) -3 -8 -5 -7 -6
б) 1 8 5 7 2
в) 3 0 5 0 6
г) S = 3 + 8 + 5 + 7 + 6 = 29
д) P = 3 * 5 = 15
е) K = 3
Математическая модель (а также программа; зависит от того, что понимать под этапом формализации).
В учебнике выделяют такие этапы решения задачи на компьютере:
- Исходные данные (результат - словесная информационная модель)
- Формализация (математическая модель)
- Алгоритмизация (алгоритм)
- Программирование (программа)
- Отладка, тестирование (уточнение модели)
- Выполнение расчетов (получение результатов)
Нормальные люди понимают, что после формализации информация должна быть представлена на формальном языке, таких языком может быть как математический, так и язык программирования.
#include <stdio.h>
#include <stdlib.h>
#include <locale.h>
int main(void)
{
setlocale(LC_ALL, "Russian");
int n, iuneven = -1;
scanf("%d", &n);
int *a = (int*)malloc(n * sizeof(int));
for (int i = 0; i < n; i++)
scanf("%d", &a[i]);
for (int i = 0; i < n; i++)
if (a[i] % 2 == 1)
{
iuneven = i;
break;
}
free(a);
iuneven == -1 ? printf("Нечетное число не найдено\n") : printf("%d\n", iuneven);
return 0;
}