Регистрация
арбуз30
28.11.2022 16:33
Информатика
Есть ответ 👍

Закодируйте тексты в виде кода ascii текст apple

284
438
Посмотреть ответы 2

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

Onik2002
Onik2002
4,4(8 оценок)
Var s: string; i: integer; begin write ('введите слово: '); read (s); for i: =1 to length(s) do write (ord(s[i]), ' '); end
АнимешникИз2К17
АнимешникИз2К17
4,7(19 оценок)
Цикл проработает 3 раза a=4 b=4 s=8 a=1 b=1   a=2 b=2  a+b< 8   a=3 b=3 a+b< 8   a=4 b=4 a+b=8 var a,b,s: integer; begin   a: =1; b: =1;   i: =0; while a+b< 8 do begin   a: =a+1; b: =b+1; end; s: =a+b end.

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