Важная информация
Показано с 1 по 2 из 2

Тема: Как вывести минимальное значение d?

  1. #1 Как вывести минимальное значение d? 
    Новичок
    Регистрация
    28.05.2019
    Сообщений
    11
    Сказал(а) спасибо
    2
    Поблагодарили 1 раз в 1 сообщении
    Pascal Code:
    1.  
    2. program lab6;
    3. const n=4;
    4. type matr=array[1..n,1..n] of real;
    5. var a: matr;
    6. i,j,k:integer;
    7. d, min:real;
    8. begin
    9.  
    10. Writeln('Массив:');
    11. for i:=1 to n do
    12. begin
    13. for j:=1 to n do
    14. begin
    15. a[i,j]:=sin(i+j);
    16. write(a[i,j]:6:2);
    17. end;
    18. writeln;
    19. end;
    20. for i:=1 to n do
    21. begin
    22. d:=0;
    23. for k:=1 to n do
    24. d:=(d+abs(a[i,k]));
    25. writeln('Строка ',i:2,' D=',d:6:2);
    26.  
    27. end.
    Ответить с цитированием  
     

  2. #2  
    Супер модератор Аватар для >Quiet Snow<
    Регистрация
    11.04.2011
    Адрес
    Планета земля
    Сообщений
    4,113
    Сказал(а) спасибо
    1,923
    Поблагодарили 1,031 раз(а) в 889 сообщениях
    Записей в блоге
    1
    На каком промежутке вычислений нужно фиксировать минимальное?
    После каждой итерации k(минимальным будут первые итерации) или после того как k станет равным n?
    Обучение прикладному программированию(по skype), качественно, недорого, 18+, вопросы в личку.
    «Если вы ничего не сделаете, я уверяю вас, ничего и не произойдёт» © Жак Фреско
    Ограниченно модерирую.
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Ответов: 3
    Последнее сообщение: 08.04.2012, 19:25
  2. Найти значение
    от Ириска в разделе QBasic
    Ответов: 4
    Последнее сообщение: 08.01.2012, 17:49
  3. Ответов: 5
    Последнее сообщение: 15.12.2011, 22:25
  4. Значение слова дос =)))
    от Абадябер в разделе Юмор
    Ответов: 5
    Последнее сообщение: 14.12.2011, 10:45
  5. Вычислить значение функции
    от Макс в разделе QBasic
    Ответов: 1
    Последнее сообщение: 06.12.2011, 04:08
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •