profile
Опубликовано 5 лет назад по предмету Информатика от nfymnh1259

Пожалуйста,помогите!Нужно срочно!

Написать программу проверяющую, принадлежит ли число введенное с данной клавиатуры промежутку от 0 до 5.

 

(0;5)
(а>0) and (a<5)

Начало:

Program....

var...

begin

Writeln('................')

readln(...)

if .........then.........else......;

wriyeln('..................');

end.

  1. Ответ
    Ответ дан 3ilbom
    Program abc
    var a:longint;
    begin
    Writeln('Введите число');
    readln(a);
    if  a>0 and a<5 then writeln('Podhodit')
    else writeln('Ne podhodit');
    end.
    1. Ответ
      Ответ дан nfymnh1259
      проверено в паскале,чего-то не хватает
  2. Ответ
    Ответ дан merekekz
    Program zadanie;
    var
    a:real;
    begin
    readln(a);
    if (а<0) and (a>5) then Writeln('принадлежит ') else
    wriyeln('непринадлежит ');
    end.
    1. Ответ
      Ответ дан merekekz
      все
    2. Ответ
      Ответ дан merekekz
      измени a>0 и a<5
Самые новые вопросы