<em>// PascalABC.NET 3.2, сборка 1387 от 17.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a,b:integer;
Write('Введите границы диапазона: '); Read(a,b);
if b<a then Swap(a,b);
Range(a,b).Where(x->x mod 7=0).Println
end.
<u>Пример</u>
Введите границы диапазона: -20 67
-14 -7 0 7 14 21 28 35 42 49 56 63
<span><span>1) 2,54см <span>* 15 = 38,1см</span></span>
Соотношение между длиной и широтой экрана для разрешения 1024х768 768:1024 = 0,75
Находим ширину. Пусть ширина экрана равна "X", тогда высота равна 0,75X. По теореме Пифагора получится: X2+(0,75X)2=38,12<span>1,5625X2 = 1451,61</span>X2 ≈ 929<span><span>X ≈ 30,5 </span>см
</span>Кол-во точек равно: 305мм:0,28мм=1089
Ответ: Максимально возможное разрешение равно 1024х768</span>
Системный программный информационый
.........................