М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
kulisenok
kulisenok
06.04.2021 22:34 •  Информатика

ответьте Только просто больше нету 1. Этапы решения прикладных задач на ЭВМ: постановка задачи, построение математической модели, выбор метода решения.

2. Этапы решения прикладных задач на ЭВМ: разработка алгоритма.

3. Этапы решения прикладных задач на ЭВМ: разработка программы, отладка, применение и сопровождение программы

4. Какие этапы компьютерного решения задач осуществляются без участия компьютера?

5. Что называют математической моделью объекта или явления?

6. Почему невозможно точное исследование поведения объектов или явлений?

7. Какие моделирования осуществляются с компьютера?

8. Из каких последовательных действий состоит процесс разработки программы?

9. Чем тестирование программы отличается от её отладки?

10. Как следует планировать процесс отладки программы?

11. В чём заключается отличие синтаксических ошибок от семантических?

12. О чём свидетельствует отсутствие сообщений машины о синтаксических ошибках?

13. Какие разновидности ошибок транслятор не в состоянии обнаружить?

14. Для чего программам требуется сопровождение?​

👇
Открыть все ответы
Ответ:
kristinarepina
kristinarepina
06.04.2021
Program ZAD00; {} uses crt;
var a,b:array[1..20] of real;
i:integer;
mina,minb,s:real;
Begin
{ заполнение массива А}
for i:=1 to 7 do begin write('введите элементы a[',i,']='); read(a[i]); end;
{ заполнение массива B}
for i:=1 to 9 do begin write('введите элементы b[',i,']='); read(b[i]); end;
{ min в массиве А}
mina:=a[1];
for i:=1 to 7 do begin
a[8]:= 32767 ;
if (a[i]>= a[i+1]) and (a[i+1]<=mina) then mina:=a[i+1]  end;
{ min в массиве B}
minb:=b[1];
for i:=1 to 9 do begin
b[10]:=32767;
if (b[i]>= b[i+1]) and (b[i+1]<=minb) then minb:=b[i+1]  end;
{ сложение minA и minB}
s:=mina+minb;
{ вывод результатов на экран
for i:=1 to 7 do begin write(a[i],' '); writeln; end;
for i:=1 to 9 do begin write(b[i],' '); writeln; end;
writeln('minA=',mina);
writeln('minB=',minb);
writeln('сумма их s=', s);
End.
4,6(7 оценок)
Ответ:
annmalik98
annmalik98
06.04.2021
Не трудно, но не полностью условие выполнено. Лови решение:

program arrs;
var
a : array[1..26] of integer;
i, min, max : integer;
m1, m2 : byte;

begin
randomize;
for i:=1 to 26 do begin
a[i] := random(29)-15;
write(a[i], ' ');
end;
min := 15;
max := -20;
for i:=1 to 26 do begin
if a[i] < min then begin
min:=a[i];
m1 := i;
end;
if a[i] > max then begin
max:=a[i];
m2 := i;
end;
end;
writeln;
writeln('Минимальный элемент в ячейке ', m1, ' равен ', min);
writeln('Максимальный элемент в ячейке ', m2, ' равен ', max);
end.

тестовый прогон:

0 2 -1 2 -9 -13 -9 -5 0 -14 11 6 8 -11 13 3 -15 -6 -15 -14 -3 13 9 7 3 -4
Минимальный элемент в ячейке 17 равен -15
Максимальный элемент в ячейке 15 равен 13
4,5(76 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ