Регистрация
tumoannasehko
13.06.2022 13:22
Информатика
Есть ответ 👍

Uses crt; var i_put,o_put: string; i,s_ch,n: byte; flag: boolean; begin clrscr; writeln('vvedite stroku: '); readln(i_put); flag: =true; while flag do begin flag: =false; s_ch: =pos(' ',i_put); if s_ch< > 0 then begin delete(i_put,s_ch,1); flag: =true; end; end; n: =length(i_put); o_put[0]: =i_put[0]; for i: =1 to n do o_put[i]: =i_put[n+1-i]; if (i_put=o_put) then writeln('yes') else writeln('no'); readkey; end. надо переводить на с#

193
490
Посмотреть ответы 1

Ответы на вопрос:

violettasergeevna
violettasergeevna
4,7(32 оценок)

24 Кбайт

Объяснение:

((8*64*48)*8)/1024/8=24 Кбайт.

Популярно: Информатика