Question

В программном коде впишите недостающие слова или символы. program chisla [ недостающее ] [ недостающее ] a, s [ недостающее ] byte;beginrepeatread ( [ недостающее ] );s:=s+a;until s>20;writeln ('s=', [ недостающее ] );end.

Answer 1

program chisla ;

var a, s : byte;

begin

repeat

read (a);

s:=s+a;

until s>20;

writeln ('s=', s );

end.

Answer 2

program chisla [недостающее] [недостающее] a, s [недостающее] byte; begin repeat readln(a); s:=s+a; until s>20; writeln ('s=',[недостающее]); end.