Задать вопрос
14 февраля, 00:49

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

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

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

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

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

+2
Ответы (1)
  1. 14 февраля, 01:34
    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-й элемент массива чётным ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы