Когда сообщение является информативным

Знания

Информатика

1 ответ:

ИринаАнокина [1]4 года назад

0 0

Когда оно несет в себе информацию. А сообщение несет в себе информацию для человека, если содержащиеся в нем сведения являются для него новыми и понятными.

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

Составить программу, которая проверяла бы, не приводит ли суммирование двух целых чисел А и В к переполнению (т.е. к результату

Римлянка [75]

Var
a, b, s : Integer;
begin
Write('введите a= ');
readln(a);
Write('введите b= ');
readln(b);
S:=a+b;
if s<32767 then writeln(s) else writeln('произошло переполнение');
end.

0 0

4 года назад

Прочитать ещё 2 ответа

Помогите сделать программу pascal. В одномерном массиве с четным количеством элементов (2N) находятся координаты N точек плоскос

РикарСпарта

const
n = 5;

var
arr: array [1..2*n] of integer := (0,1, -2,1, -1,-1, 1,2, -3,0);
i: byte := 1;
maxr: real;

begin
repeat
maxr := max(sqrt(sqr(arr[i]) + sqr(arr[i + 1])), maxr);
i += 2;
until (i > 2 * n - 1);
writeln(maxr);
end.

0 0

4 года назад

Программа нахождения четных чисел из 10 любых на языке Pascal

ОксанаОксанаОксан... [8]

Var
mas:array[1..10]of integer;
i:integer;
Begin
write('Введите 10чисел: ');
for i:=1 to 10 do readln(mas[i]);
write('Четными являются: ');
for i:=1 to 10 do if (mas[i] mod 2 = 0) then write(mas[i],' ');
End.

0 0

4 года назад

Выручайте братцы !!!!

MarinaFor

1 и 2 правильно пацан.

0 0

4 года назад

Самораспаковывающийся архив имеет расширение:

ale101010 [16]

Имеет расширение zip файла

0 0

4 года назад