Так на пример чтоб совершить какой либо алгоритм ты его предстовояешь сегодня сделал много алгоритмов например с утра что ты делаешь 1. открываешь глоза 2.встаешь 3.одеваешь тапочки 4.встоешь с кровати 5.запровляешь кровать 6.идёшь в вану 7.принимаешь душ 8.чистиш зубы 9.вытираешься 10.одеваешься 11.идеш на кухню 12.береш чайник 13.идёшь к воде 14.включаешь воду 15.подстовляешь чайник 16.ждешь пока набирается вода 17.выключаешь воду 18.идеш к плите 19. ставишь чайник 20.зажигаешь спичку 21.включаешь газ 22.подносишь спичку 23.ждешь воду и т.д )
Program vasha_zadacha_1;var b,c:integer; a:array [1..20] of integer; begin randomize; b:=0; for c:=1 to 10 do begin a[c]:=random(0,99); writeln('элемент массива ==>', a[c]); if (a[c] mod 2 = 0) then b:=b+a[c]; end; writeln('сумма чётных элементов массива', b); end.
program vasha_zadacha_2; var b,c:word ; a:array [1..20] of integer; begin randomize; b:=1; for c:=1 to 10 do begin a[c]:=random(0,99); writeln('элемент массива ==> ', a[c]); b:=b*a[c]; end; writeln('произведение всех элементов массива ', b); end.
program vasha_zadacha_3; var b,c:word ; a:array [1..20] of integer; begin randomize; b:=0; for c:=1 to 10 do begin a[c]:=random(0,99); writeln('элемент массива ==> ', a[c]); if (a[c] >= 50) and (a[c]<=60) then b:=b+a[c]; end; writeln('сумма элементов в диапазоне от 50 до 60 ', b); end.
Photo-Brush это фотографии
Paint.net это рисовать