4 года назад

Помогите,пожалуйста,с 10 номером. спасибо❤️

Знания

Информатика

1 ответ:

deventen4 года назад

0 0

Ответ:

Объяснение:

А - верно,

Б- не верно

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

помогите пожалуйста написать программу по инфе..."Напишите программу получение из заданного целочисленного массива размером 30 э

-Фемида- [7]

Const N = 30;
Var a:array [1..N] of integer; b,c,d,i:integer;
begin
Writeln('Vvedite massiv');
for i:=1 to N do
readln(a[i]);
b:=0; c:=0; d:=0;
for i:=1 to N do begin
if a[i] = 0 then inc(b);
if a[i] > 0 then inc(c);
if a[i] < 0 then inc(d);
end;
writeln('Kol-vo ravnih 0 - ',b);
writeln('Kol-vo bolshe 0 - ',c);
writeln('Kol-vo menshe 0 - ',d);
readln;
end.

0 0

4 года назад

Что делать если не показывает статус в ватсапе? у меня не показывает статус других, а у других мой статус не показываетпомогите

Intellekt [176]

Ответ:

Зайди в статус, нажми на 3 точки и "Приватность статуса", а там на "Мои контакты"

0 0

4 года назад

Вариант 7:1. Определить максимальное и минимальное значения из двух различных вещественных чисел. 2. Дано трехзначное число. Опр

Артём ГД [88]

1)
var a, b: real;
begin
readln(a, b);
if (a > b) then writeln(a)
else
if (a < b) then writeln(b)
else
writeln('a = b');
end.

2)
var a, b, c: integer;
begin
readln(a);
b := a mod 100 div 10;
c := a mod 10;
a := a div 100;
write('a) ');
if (a > c) then writeln(a)
else
if (a < c) then writeln(c)
else
writeln('=');
write('b) ');
if (a > b) then writeln(a)
else
if (a < b) then writeln(b)
else
writeln('=');
write('c) ');
if (c > b) then writeln(c)
else
if (c < b) then writeln(b)
else
writeln('=');
end.

3 даже представить не могу, извините:)

0 0

4 года назад

Даны переменные 9 помогите 20 баллов

Gagrigd

1) A='Q' -cимвольный.

2) B=5 - целый.

3) С= 45. - вещественный.

4) D = True - логический.

0 0

4 года назад

Задан одномерный массив Х(N). Вычислить квадрат разности между минимальным и максимальным элементами массива и записить его на м

Светлана277 [26]

Прикрепляю ответ. Я так пологаю нужно на c++

0 0

3 года назад