Выделите красным цветом ложные высказывания для цикла с параметром. ​

если что-то будет не так - напиши, испралю. у меня простог нет возможности проверить, выполняется  

program string_7; var s: string; k,l,i: integer; begin write('введите строку: '); readln(s); k: =0; l: =0; for i: =1 to length(s) dobegin if s[i]='н' then k: =k+1; if s[i]='м' then l: =l+1end; writeln('н=',k); writeln('м=',l); if k> l then writeln ('больше букв н'); if k< l thenwriteln ('больше букв м'); if (k = 0) and (l = 0) thenwriteln ('таких букв нет'); end.

так будет элсе выкидывало бы что букв н больше, если бы ни м ни н не встретилось))

64*48*12*8=294,912- обьем в байтах 1 стр

паскаль же?

var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin

d: =d+k;

val(s,k,err);

end;

write (d);

end.

#include < iostream> #include < vector> #include< windows.h> using namespace std; char bufrus[256]; char* rus(const char* text) { chartooem(text, bufrus); return bufrus; }int main(){ vector< int> m; //объявили динамический массивint n,count,sum; count=sum=0; cout< < rus("введите количество элементов массива: ");

cin> > n; for(int i=0; i< n; i++){ cout< < "m["< < i+1< < "]"; int temp; cin> > temp; if (temp> 7){count++; sum+=temp; } m.push_back(temp); }cout< < rus("количество элементов: ")< < count< < endl; cout< < rus("сумма элементов: ")< < sum; cin> > n; return 0; }

как видите, всё просто)