3 DIM i As Int, j As Int, P As Int, K As Int

7 P = 0 : K = i

9 If NAZ$=RM$(j) Then P = P + KOL Else RM$(j) = NAZ$ : P = KOL

11 KM(i) = P

Вроде бы так

0 0

4 года назад

Назовите основные причины развития информатики в современном мире

veroninakira

На мой взгляд это:
1.Исследование информационных процессов любой природы.
2.Разработка информационной техники и создание новейшей технологии переработки информации на базе полученных результатов исследования информационных процессов.
3.Решение научных и инженерных проблем создания, внедрения и обеспечения эффективного использования компьютерной техники и технологии во всех сферах общественной жизни.

0 0

3 года назад

Напишите программу в Паскаль ABC, которая запрашивает значения x,y,z, а затем выводит значение следующих функций: max(x,min(y,z)

Тоша 93 [151]

Var x,y,z,a:integer;
begin
read(x;y;z);
if y<z then a:=y else a:=z;
if x>a then write(x) else write (a);
writeln;
if y<x then a:=y else a:=x;
if a<x then write (a) else write (x);
end.

0 0

4 года назад

Сколько байт памяти занимает цветное изображение шириной 30 точек и высотой 10 точек в цветовой модели RGB

0леська

В RGB 256 цветов
256=2^8 --> 8 бит для одного пикселя (точки)
30*10*8=2400 бита = 300 байта <--- ответ

0 0

4 года назад