Задать вопрос
28 июля, 10:07

Дан массив целых чисел. Выяснить:

1) является ли s-й элемент массива положительным числом;

2) является ли k-й элемент массива чётным числом;

3) какой элемент массива больше k-й или s-й.

Паскаль для Лазаруса.

+5
Ответы (1)
  1. 28 июля, 13:24
    0
    На 1 пункт:

    program mueta;

    uses crt;

    const n = (любому числу, например 3) ;

    var k:array[1 ... n]of integer;

    s:array[1 ... n]of integer;

    begin

    clrscr;

    for i:=1 to n do begin

    writeln ('введите эл-ты массива s[i]=') ;

    readln (s[i]) ;

    end;

    for i:=1 to n do begin

    if s[i]>0

    then

    writeln ('s[i] положительное число', s[i]) ;

    ENd.

    2) На второй тоже самое только нужно заменить массив на (k) условие нужно поменять на s[i]mod 2=0
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дан массив целых чисел. Выяснить: 1) является ли s-й элемент массива положительным числом; 2) является ли k-й элемент массива чётным ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы