Одномерный массив с операторами mod и div . задан фрагмент программы: begin a[1]: = 103; a[2]: =25; a[3]: =15; a[4]: =32; a[5]: =27; a[6]: =14; a[7]: =31 a[8]: =11 for i=1 to 7 do begin s3: =s3+3-a[i+1] div (a[i]-3); if a[i]mod3=0 then s1: =s1+(a[i]+4)div2 else s2: =s2-4+a[i+1]mod5; end; какие значения примут переменные s1,s2,s3 в результате выполнения данного блока программы?

Alla123489 Alla123489    3   23.08.2019 12:30    1

Ответы
Sark23 Sark23  05.10.2020 14:37
ответ: 24, -16, 17.

//Пруф:
//PascalABC.Net 3.2
begin
var a:=arr(103, 25, 15, 32, 27, 14, 31, 11);
var s1:=0; var s2:=0; var s3:=0;
for var i:=0 to 6 do
begin
s3:=s3+3-A[i+1] div (A[i]-3);
if (A[i]mod 3)=0
then s1:=s1+(A[i]+4) div 2
else s2:=s2-4+A[i+1] mod 5;
end;
print (s1, s2, s3);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика