Question

1) Определите значение переменной s после выполнения фрагмента программы: s:=0 k:=0 нц пока s < 1024 s:=s+10 k:=k+1 кц s:=0; k:=0; while s < 1024 do begin s:=s+10; k:=k+1; end; 2) Определите значение переменной s после выполнения фрагмента программы: s:=0 нц для к от -3 до 5 s:=s+к кц s:=0; for k:=-3 to 5 do begin s:=s+k; end; 3) По каналу связи передается последовательность положительных целых чисел, все чис-ла не превышают 1000, их количество заранее неизвестно. Каждое число передается отдельно. Признаком конца передаваемой последовательности является число 0. После числа 0 передается контрольное значение – наибольшее число из последовательности, которое делится на 10. Напишите эффективную программу, которая получает последовательность чисел и следующие за ней признак конца и контрольное значение, а также проверяет правильность контрольного значения. Программа должна напечатать отчет следующего вида: Получено .. чисел Полученное контрольное значение: …. Вычисленное контрольное значение:… Контроль пройден (или – контроль не пройден)

Answer 1

1) 1030

2)9

3) на фотографии