//PascalABC.NET версия 3.4.0.1677 от 17.06.18
//Если программа не запускается, то обновите версию
uses System.Linq;
function GetPrimes(n: integer): List<integer>;
begin
var primes := new List<integer>();
primes.Add(2);
for var i := 3 to n do
begin
if primes.All(x -> i mod x > 0 ) then
primes.Add(i);
end;
GetPrimes := primes;
end;
begin
var n := ReadInteger('n =');
var primes := GetPrimes(2 * n);
foreach var p in primes do
if primes.Contains(p + 2) then
writeln(p, ' ', p + 2);
end.
Решение на C. Переведи на синтаксис паскаля :)
#include <stdio.h>
int pearCount;
int friendsCount;
int main(int argc, const char * argv[]) {
printf("Количество груш: ");
scanf("%i", &pearCount);
printf("Количество подруг: ");
scanf("%i", &friendsCount);
if (pearCount % friendsCount != 0) {
printf("Количество груш '%i' Количество подруг '%i': нет\n", pearCount, friendsCount);
} else {
printf("Количество груш '%i' Количество подруг '%i': да\n", pearCount, friendsCount);
}
return 0;
}
1. Системный блок, монитор, клавиатура мышь.
2.Включить компьютер в сеть, нажать кнопку включения, ждать загрузки операционной системы.
3. F(N)- функциональные клавиши.
Клавиша <span>Shift </span>– используются для ввода символов строчных и прописных букв в разных регистрах
Клавиши <span>Ctrl </span>и <span>Alt </span>– <span>это две </span><span>управляющие клавиши
</span>Клавиатура имеет две клавиши Shift<span> – справа и слева. Для переключения регистра можно использовать и ту, и другую – они идентичны.
</span>К<span>лавиша </span><span>Caps Lock </span>– <span>при нажатии этой клавиши загорается одноименный индикатор и буквы вводятся заглавные (прописные, большие), при повторном нажатии этой клавиши индикатор гаснет, и буквы вводятся прописные (строчные, маленькие).
</span>
Клавиша Tab<span> (табуляция) – задает отступ от левого края, используется для создания нового абзаца (красная строка)
</span>
Клавиша Pause/Break <span>приостанавливает работу программы
</span>
Клавиша Scroll Lock<span> включает полосу прокрутки в некоторых программах.
</span>
Клавиша <span>Print </span><span>Screen </span><span>(Print – печать, Screen - экран) – делает снимок экрана
</span>
10.Вопрос непонятен, скорее всего: CD-R, CD+R, DVD-R, DVD+R, DVD+RW и т.п.
11. Периферийные устройства: принтеры, хабы, внешние винчестеры, веб-камеры, динамики, наушники и т.п.
22. Используйте меню «Пуск» для выполнения следующих задач:запуск программ;открытие наиболее часто используемых папок;поиск файлов, папок и программ;настройка параметров компьютера;получение справки по работе с операционной системой Windows;выключение компьютера;завершение сеанса работы пользователя в Windows или переключение к учетной записи другого пользователя.25. ВТФ? Прайо клавишей мышки в каталоге-создать-папку
32.<span>Удаляет выбранный элемент управления или текст и помещает его в </span>буфер обмена<span>.</span>
Program Massiv;
Const n = 5;
Var a: Array [1..n] of Integer;
tmp, c, i: Integer;
Begin
WriteLn('Введите ', n, ' чисел через пробел');
For i := 1 To n Do
Read(a[i]);
c := 1;
For i := 1 To n Do
If a[i] = 0 Then
Begin
tmp := a[c];
a[c] := a[i];
a[i] := tmp;
c := c + 1;
End;
WriteLn('Результат:');
For i := 1 To n Do
Write(a[i], ' ');
ReadLn;
<span>End. </span>