4 года назад

Помогите пожалуйста!Рассотрите пример и укажите информации!

Знания

Информатика

2 ответа:

Juliete4 года назад

0 0

Текстовая (несмотря на то, что тут только дата и два числа) и графическая.

олегцуац [67]4 года назад

0 0

Числовой и графический

Читайте также

Даны A1, A2, A3. Определить, есть ли среди них переменная, значение которой лежит в диапазоне от 5 до 10? Если такой переменной

Matvey122

Program asd;
Var a1,a2,a3:integer;
sr:real;
BEGIN
Write('Введите А1: ');
Readln(a1);
Write('Введите A2: ');
Readln(a2);
Write('Введите А3: ');
Readln(a3);
If (a1>=5) and (a1<=10) then Writeln('Есть. ',a1)
else
If (a2>=5) and (a2<=10) then Writeln('Есть. ',a2)
else
If (a3>=5) and (a3<=10) then Writeln('Есть. ',a3)
else
Writeln('Нету.')
<span>END.</span>

0 0

1 год назад

Файл-это?1)ОДНОРОДНЫЙ ПО СМЫСЛУ БЛОК ДАННЫХ,ХРАНЯЩИЙСЯ ВО ВНЕШНЕЙ ПАМЯТИ И ИМЕЮЩИЙ ИМЯ2)ОБЪЕКТ ХАРАКТЕРЕЗУЮЩИЙ ИМЕНЕМ,ЗНАЧЕНИЕ И

Карина19851806 [390]

<span>1)ОДНОРОДНЫЙ ПО СМЫСЛУ БЛОК ДАННЫХ,ХРАНЯЩИЙСЯ ВО ВНЕШНЕЙ ПАМЯТИ И ИМЕЮЩИЙ ИМЯ</span>

0 0

4 года назад

Опряделите значения переменной а после исполнение данного алгоритма a := -3 b := -a - a a := a + 2 a := -b + a*b

Никита Васин

//PascalABC.Net 3.1.0.1200
var
    a, b: integer;

begin
    a := -3;
    b := -a - a;
    a := a + 2;
    a := -b + a * b;

    Println(a, b);
end.

Вывод -12 6

0 0

4 года назад

ПРЯМ СРОЧНО Составьте программу которая определяет количество в массиве четных чисел используя подпрограмму проверки четности ма

Георгий25

var a:array of integer;

N,i,k:integer;

function f(a:integer):Boolean;

begin

if (a mod 2=0) then f:=True else

f:=False;

end;

BEGIN

k:=0;

writeln('Введите количество элементов массива');

readln(N);

SetLength(A,N);

writeln('Введите массив');

for i:=0 to N-1 do begin

read(a[i]);

if (f(a[i])=True) then k:=k+1;

end;

writeln('Количество чётных элементов массива = ',k);

end.

Вводите с клавиатуры кол-во элементов массива, а затем сам массив.

0 0

4 года назад

У какого дерева шишка длиннее У сосны обыкновенной или у ели обыкновенной

lisenok-yu

У сосны конечно в интернете набери картинки посмотри и не парься

0 0

4 года назад