profile
Размещено 4 года назад по предмету Информатика от ProZaza

Помогите пожалуйста, написать программу в паскале!!! Срочно!!!

Дана действительная матрица размера m x n. Найти значение наибольшего по модулю элемента матрицы, а так же определить есть ли в матрице хотя бы один простой элемент.

  1. Ответ на вопрос
    Ответ на вопрос дан ussrex
    program matr;
    uses crt;
    const m=(число); n=(число);
    var
    a:array[1..m,1..n] of integer;
    i, j:integer; max:real; k:boolean;

    function prost(x:integer):boolean;
    begin
    prost:=false;
    if x>0 then
    if (x=1) or (x=2) then prost:=true else
    for i:=2 to x-1 do
    if mod(x, i) =0 then prost:=true;
    end;

    begin clr scr;

    for i:=1 to m do begin
    for j:=1 to n do begin
    write(' a[i,j] = '); read(a[i, j]) end;
    writeln
    end;

    max:=abs a[1,1];
    k:=false;
    for i:=1 to m do
    for j:=1 to n do begin
    if abs(a[i, j]) > abs(max) then max:= a[i, j];
    if prost(a[i, j]) then k:=true
    end;
    writeln('Максимальный по модулю элемент равен ', max);
    if k then wrteln('Матрица содержит хотя бы один простой элемент') else writeln('Матрица не содержит простых элементов');
    readln
    end.
    1. Ответ на вопрос
      Ответ на вопрос дан ProZaza
      Все понял)))Спасибо большое)))
    2. Ответ на вопрос
      Ответ на вопрос дан ussrex
      Да, пожалуйста. Пальчик вверх сделай, если не трудно :-)
    3. Ответ на вопрос
      Ответ на вопрос дан ProZaza
      Уже)Еще раз спасибо!)
    4. Ответ на вопрос
      Ответ на вопрос дан ussrex
      Не забудь, там где константы вводятся m и n вместо слова "число" должны стоять конкретные числа, из циферок, то бишь )
    5. Ответ на вопрос
      Ответ на вопрос дан ProZaza
      Это я понял)
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.