Var B: array [1..12] of integer; i, s, s_min: integer; begin writeln; randomize; s := 0; s_min := 0; for i := 1 to 12 do B[i] := random(65) - 5; for i := 1 to 12 do begin write(B[i], ' '); s := s + B[i]; if B[i] < 7 then s_min := s_min + 1; end; writeln(); writeln('Sum: ', s, ', amount of elemnts which lower than 7: ', s_min); end.
1.клавиатура,мышь,сканер.микрофон 2.процессор 3.чтение книги,толковый словарь,заучения правила(нащет видеокассеты зависит какое видео) 4.Backspace 5.Рабочий стол 6.операционная система 7.На ПЗУ (не знаю что это постояная память или жесткий диск 8.происходит обработка, связанная с изменением формы информации, но не изменяющая ее содержания 9.Название приложения,кнопка "Свернуть,кнопка "Закрыть",панель инструментов, палітра,рабочая область 10.Жесткий диск,флешка,лазерный диск (для DVD) ,SD-карты 11.Квадрат зелённый
Разгадайте кроссворд:1.) Другое название прикладной программы. ( 10 букв ) 2.)Изображение на экране монитора готового к работе компьютера ( два слова) ( 7 букв в первом слове и 4 буквы во втором слове ) 3.) Единица информации , равная восьми битам. ( 4 буквы) 4.) Группа файлов, имеющая имя; контейнер для файлов. ( 6 букв) 5.) Прямоугольная область, занимаемая на рабочем столе работающей программой. ( 4 буквы) 6.) Файл содержащий данные ( рисунки, тексты). ( 8 букв) 7.) обязательная часть програмного обеспечения - ... система. ( 12 букв) 8.) самая маленькая единица измерения информации. ( 3 буквы) 9.) информация хранящаяся в долговременной памяти как единое целое и обозначенная именем. ( 4 буквы)1. Приложение 2. Добро 3. Байт 4. Каталог, папка. директория, фолдер 5. Окно 6. Документ 7. Операционная система 8. бит 9. Файл
begin
writeln;
randomize;
s := 0;
s_min := 0;
for i := 1 to 12 do
B[i] := random(65) - 5;
for i := 1 to 12 do
begin
write(B[i], ' ');
s := s + B[i];
if B[i] < 7
then
s_min := s_min + 1;
end;
writeln();
writeln('Sum: ', s, ', amount of elemnts which lower than 7: ', s_min);
end.