Есть ответ 👍

Переведите число 34AD в десятичную систему счисления​

133
499
Посмотреть ответы 1

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


program slova;

uses crt;

var s1,s2: string;

 

        i,k: integer;

begin

      clrscr;

      s2: ='';

      write('введите слово: ');

      readln(s1);

      k: =length(s1);

      for i: =1 to k do

          if (i mod 2)=0 then s2: =s2+s1[i];      

    writeln('полученное слово: ',s2);  

    readkey;

 

end. 

 

 

 

 

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