системное программное обеспечение обеспечивает: выполнение конкретных задач, позволяющий выполнять на пк несколько залач или это проектирование и разработка программ?
Какие значения чисел: 0.85Е2 =85 -5.7Е-3 = -0.0057 0.1Е4=1000
Что будет выведено на экран после выполнения следующих команд: a-435c c= 35.1b= -435 280.126-435
Вычислить значения выражений: Round(frac(6.9)); = 1 20 mod 6 * 3; = 6 sqrt(trunc(0.5)) = 0
Записать выражения в общепринятой форме: (-3ab+(b-4*a*c)^2)/корень(2*a); (корень(|a-b|)*(a+b)^2.
a) y:= y * 2; правильная. операция возможна для вещественных чисел. в) х:= х mod 3 + х*cos(0); правильная, все опрации подходят для целых чисел б) x:=trunc(y); правильная г) x:= y+1. неверно нельзя преобразовать вещественный тип в целый
1 program z; var i : integer; begin Writeln('Введите число'); Readln(i); if i mod 2 = 0 then Writeln('Число чётное') else Writeln('Число не чётное'); readln; end.
2 program z; var i : integer; begin Writeln('Введите число'); Readln(i); if i mod 3 = 0 then Writeln('Число делится на 3') else Writeln('Число не делится на 3'); readln; end.
3 program z; var i: array[1..6] of byte; x:byte; begin for x:=1 to 6 do
begin Writeln('Введите ', x,' цифру из 6 '); Read(i[x]); end; if (i[1]+i[2]) = (i[4]+i[5]+i[6]) then Writeln('Билет счастливый') else Writeln('Билет не счастливый'); Readln; end.
5))) program z; var i : integer; begin Writeln('Введите число'); Readln(i); if i mod 6 = 0 then Writeln('Число делится на 6') else Writeln('Число не делится на 6'); readln; end. 6 program z; var a,b:integer; begin Writeln('Введите число A'); Readln(a); Writeln('Введите число B'); Readln(b); if b mod a = 0 then Writeln('Число А делится нацело на число В') else Writeln('Число А не делится нацело на число B'); Readln; end.
системное программное обеспечение обеспечивает: выполнение конкретных задач, позволяющий выполнять на пк несколько залач
Объяснение: