Решите плизз что можете!!!! 1. Написать программу, проверяющую, принадлежит ли число Х,...

0 голосов
48 просмотров

Решите плизз что можете!!!!
1. Написать программу, проверяющую, принадлежит ли число Х, введенное с клавиатуры, интервалу [a,b].

3. Составить программу вычисления объема, площади поверхности и суммы ребер прямоугольного параллелепипеда.

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


Информатика (16 баллов) | 48 просмотров
Дан 1 ответ
0 голосов

первая)

Program Z;

uses crt;

var a,b,x:integer;

begin

  Clrscr;

 

  write ('A:');

  readln (A);

 

  write ('B:');

  readln (b);

 

  write ('Chislo:');

  readln (x);

 

  if (x>=a) and (x<=b) then write ('Da')</p>

                   else write ('Net');

 

  readln

end. 

(164 баллов)