Я недавно была на на такой же ярмарке, и там рассказывалось про всякие учебные заведения в твоем городе, р-не, области, и представители этих учереждений выходили и рассказывали о своих колледжах и институтов и какие именно там есть специализации.
Ну надеюсь понятно объяснила.
Алг Число
нач
цел n,a,b,c,d
ввод n
a:=mod(n,10);
n:=div(n,10);
b:=mod(n,10);
n:=div(n,10);
c:=mod(n,10);
n:=div(n,10);
d:=n;
вывод "Сумма цифр числа = ", a+b+c+d;
вывод " Произведение цифр числа = ",a*b*c*d;
кон
Var
a: array[1..10] of integer;
i, max: integer;
begin
for i := 1 to 10 do
begin
read(a[i]);
if (i = 1) or (a[i] > max) then
max := a[i];
end;
writeln('Max value = ', max)
end.
1) A='Q' -<em>cимвольный.</em>
2) B=5 - <em>целый.</em>
3) С= 45. - <em>вещественный.</em><em />
4) D = True - <em>логический.</em>
ОС обеспечивает взаимодействие между прикладными программами и устройствами компьютера, благодаря ней прикладные программы работают с железом не напрямую, а через ОС.