Program primer;
Var i,n,k,chislo:integer;
Begin
cls;
write(' skolko chisel budem vvodit ? '); readln(n);
write('chislo dlia poiska : '); read(k);
for i:=1 to n do
begin
readln(chislo);
if ((chislo mod 10 = k) or (chislo div 10 = k)) then
write('chislo ',chislo,' udov uslovie.. ')
else write('chislo ',chislo,' NE udov uslovie.. ');
writeln;
end;
readln;
End.
Компа́кт-диск - <span>оптический носитель информации в виде диска с отверстием в центре, информация с которого считывается с помощью лазер</span>
<span><span>Флэш-карта - <span>Устройства, выполненные на одной микросхеме (кристалле) и не имеющие подвижных частей, основаны на кристаллах электрически перепрограммируемой флэш-памяти</span></span></span>
<span>Оперативная</span><span> память-<span>устройство, </span></span>
<span>предназначенное для хранения обрабатываемой информации (данных) и программ, управляющих процессором </span><span>обработки</span><span> информации</span><span>Кэш-память<span> – устройство, имеющее очень короткое время доступа к данным. Встроенная в микросхему сверхбыстрая память. Обычно имеет размер 256 или 512 Кбайт, в мощных компьютерах до 1Гб и более.</span></span>
Книга, т. к. это носитель информации
static void Main()
{
double a, b;
a = float.Parse(Console.ReadLine());
b = float.Parse(Console.ReadLine());
Console.WriteLine("A: " + 0.5 * (a + b));
Console.WriteLine("G: " + Math.Sqrt(a * b));
Console.ReadKey(false);
}
<span><em /><em /><em /><em>Я, конечно, не понял, что такое "точнее нужна нач программа для того что бы он вышел", но вот прототип игры из примеров паскаля, в которой невозможно победить (запускать через Pascal.ABC, в остальных версиях могут не работать лэйблы).</em></span>
