Автор: kuzya 28.09.2006 19:36
Вводится N чисел, вывести а(1)+а(2);а(2)+а(3);...;а(n-1)+a(n).
Код
║program IIzad_summy_chisel;
║uses crt;
║var
║ n,i:integer; a:array[1..10000] of integer;
║begin
║ clrscr;
║ write('Сколько чисел вы будете вводить? N=');
║ readln(n);
║ for i:=1 to n do read(a[i]);
║ for i:=1 to n-1 do writeln('a',i,'+a',i+1,'=',a[i]+a[i+1]);
║ readkey;
║end.
Как начертить, например, к этой задачке блок-схему, и вообще, что в какой фигуре что пишется?
Автор: volvo 28.09.2006 19:47
Цитата
вообще, что в какой фигуре что пишется?
Смотри, например, здесь:
http://www.rusedu.info/modules.php?op=modload&name=News&file=article&sid=492
А вообще, почему тема в разделе "Задачи"? Сама задача-то уже решена, это больше теория...
Автор: kuzya 28.09.2006 20:27
а как цикл for обозначается, я там вроде не нашел?!
Автор: klem4 28.09.2006 21:04
http://www.rusedu.info/upload/rte/Ts_P.gif