(Блок-схема во вложении)
var a,k,c:integer;
begin
c:=0;
for k:=1 to 10 do begin
read(a); c:=c+a; end;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
PASCAL
(Блок-схема во вложении)
var a,k,c:integer;
begin
c:=0;
for k:=1 to 10 do begin
read(a); c:=c+a; end;
end.