У нас новое сельское хозяйство открыли!
Сегодня на уроке писали словарный диктант!
В журнале две картинки царь,град.
У французов полком водет Наполеон Бонапарт!
Public class Solution
{
/*
public static void main (Strings args[])
{
System.out.println("Поздравляю вас с началом учебного года")
}
}
Program n1;
Uses CRT;
Var a,b,s,i: integer;
begin
writeln('Vvedite A i B');
readln(a,b);
If a>b then
for i:=b to a do
begin
writeln(i);
s:=s+i;
end
else
if b>a then
for i:=a to b do
begin
writeln(i);
s:=s+i;
end
else writeln('ravny');
writeln('Summa = ',s);
readln
end.
1 Кб = 1024 Байт = 8192 Бит
1 Мб = 1024 Кб = 1048576 Байт = 8388608 Бит
1 Гб = 1024 Мб = 1048576 Кб = 1073741824 Байт = 8589934592 Бит
<span>var<span>
A, B, C: integer;</span>
begin<span>
write('Введите A, B и C: ');</span><span>
read(A,B,C);</span><span>
writeln('Число B находится между числами A и C - ',((A < B) and (B < C)) or ((A > B) and (B > C)));
</span><span>end<span>.</span></span></span>