70
1. указать значение величины s после выполнения следующих команд.
а) s = 7; s = 23
в) а = 2; b = 5; b = b - a; s = b + a
2. какие значения приобретут переменные а, b и с после выполнения следующих
операторов, если начальные значения: а = 1, b = 2, с = 3?
а = b
b = с
с = а
как изменится результат, если в фрагменте последний оператор
переставить на первое место?
3. что появится на экране после выполнения следующих команд?
а = 4
print(a)
print(”a”)
4. что будет выведено на экран после выполнения фрагмента программы?
а = 5
b = 2
print(”сумма а и b = ”, a + b)
5. что будет выведено на экран после выполнения следующих операторов?
print(”найдем сумму : ”)
а = 3
b = 2
print(”даны числа”, а, ”и”, b)
а = а + 1
b = b - 1
а = а + 1
b = b - 1
print(”их сумма равна”, а + b)
6. найти и исправить все ошибки, допущенные в программе.
a = 6
b = 5
с = ab
print ('произведение ' а и b 'равно ', s)
program number1;
var a: array [1..5] of integer;
i,min,max: integer;
Begin
writeln('Введите 5 значений массива');
for i:=1 to 5 do
readln(a[i]);
min:=a[1];
max:=a[1];
for i:=1 to 5 do
Begin
if (a[i]>=max) then max:=a[i];
if (a[i]<=min) then min:=a[i];
End;
for i:=1 to 5 do
Begin
if max=a[i] then
Begin
writeln('Максимальное значение: ',a[i],' [',i,']');
max:=a[i];
End;
if min=a[i] then
Begin
writeln('Минимальное значение: ',a[i],' [',i,']');
min:=a[i];
End;
End;
writeln('Среднее арифметическое: ',(min+max)/2);
End.