Program BP_Sasde;
Uses crt;
Var a:array[1..20] Of integer;
imax,imin,i:integer;
begin
Clrscr;
imin:=20;imax:=0;
for i:=1 to 20 do begin
a[i]:=random(1,20);
if a[i]>imax then imax:=a[i] else imin:=a[i];
writeln(a[i]);
end;
writeln('максимум = ',imax,' а минимум = ',imin);
end.
Материнская плата ( англ. motherboard, MB; также
mainboard , сленг. мама , мать , материнка) — сложная
многослойная печатная плата, являющаяся основой
построения вычислительной системы (компьютера) .
В некоторых сложных электронных приборах и
устройствах (например сотовый телефон , телевизор )
основная (наибольшая, наиболее значимая) плата
устройства также может называться материнской
или системной .
X=1
((1<5)→(1<3) )∙((1<2)→(1<1) ) ⇒ (Истина→Истина)∙(Истина→Ложь) ⇒ Истина∙Ложь ⇒ Ложь
X=2
((2<5)→(2<3) )∙((2<2)→(2<1) ) ⇒ (Истина→Истина)∙(Ложь→Ложь) ⇒ Истина∙Истина ⇒ Истина
X=3
((3<5)→(3<3) )∙((3<2)→(3<1) ) ⇒ (Истина→Ложь)∙(Ложь→Ложь) ⇒ Ложь∙Истина ⇒ Ложь
X=4
((4<5)→(4<3) )∙((4<2)→(4<1) ) ⇒ (Истина→Ложь)∙(Ложь→Ложь) ⇒ Ложь∙Истина <span>⇒ Ложь</span>
Program ghjkligohqfaqruyfgeyfqgwqc;
var a, b, c, i :integer;
BEGIN
writeln (' Введите два числа, первое должно быть меньше и еще число делитель');
readln (a, b, c);
for i:=a to b do
begin
if (a*a) mod c=0 then
writeln (a*a);
a:=a+1;
end;
end.