Задать вопрос!

Задать вопрос!

Все категории

timohaav [3.9K]

2 года назад

5

Помогите решить пожалуйста надо сдать уже на днях

Помогите решить пожалуйста надо сдать уже на днях

Информатика

1 ответ:

fedor1272 года назад

0 0

Ничего не видно вообще

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

Вводятся координаты x y множество точек,последними вводятся значения x=0 y=0. Определить,сколько точек будет расположено во втор

KristinaFilipicheva

var

x, y: real;

k: integer;

begin

k := 0;

Read(x, y);

while (x <> 0) or (y <> 0) do

begin

if (x < 0) and (y > 0) then

k := k + 1;

Read(x, y)

end;

Writeln(k);

end.

0 0

4 года назад

Отметь верно ли высказывание: При работе с файлами не следует давать файлу имя, которое не поясняет его содержаниеВерно Не верно

X 0 X

1 - верно, 2 - не верно

0 0

4 года назад

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

Помогите выбрать ответ пожалуйста! умоляю!

kymkum

2 шаг: 9157

3 шаг: 9751

4 шаг: 9751

0 0

2 года назад

Составьте программу вычисления суммы элементов одномерного массива А(N), встречающихся в этом массиве ровно один раз.

фыввв

На Паскале:

program Program1;
var i, j, n, k: integer;
var result: real;
var array1: array [1..255] of real;
begin
     result := 0;
     write('Введите значение N (не более 255): ');
     readln(n);
     for i := 1 to n do
         begin
          write('Введите значение ', i, ' элемента массива: ');
          readln(array1[i]);
         end;
         begin
          writeln('Массив, размером - ', n, ' элементов(а):');
          for i := 1 to n do write(array1[i], ' ');
   writeln;
         end;
     for i:=1 to n do
         begin
          k := 0;
          for j:=1 to n do
          if array1[i] = array1[j] then k := k + 1;
          if k = 1 then result := result + array1[i];
         end;
     writeln('Сумма уникальных элементов массива = ', result);
end.

0 0

4 года назад

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

"я люблю информатику" кодировку ASCLL пожалуйста помогите

LastochkaRus [253]

Объяснение:

209 143 32 208 187 209 142 208 177 208 187 209 142 32 208 184 208 189 209 132 208 190 209 128 208 188 208 176 209 130 208 184 208 186 209 131

0 0

4 года назад