Регистрация
vityabro13
19.04.2023 15:08
Информатика
Есть ответ 👍

97 в 10 сестеме перевести в двуичную
плэз​

165
371
Посмотреть ответы 1

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

danildavydov2
danildavydov2
4,6(67 оценок)

program pr1; uses crt; var f,c: real; beginclrscr; c: =15; while c< =30 do begin f: =c*1.8+32; writeln(c,'-цельсия; фаренгейт - ',f); c: =c+1; end; end.

2)

program pr1; uses crt; var stroka: string; i,v,x: integer; beginclrscr; readln(stroka); x: =0; v: =0; for i: =1 to length(stroka) do begin if stroka[i]< > ' ' then v: =v+1; if (stroka[i]='т') or (stroka[i]='т') then x: =x+1; end; writeln('количество букв- ',v,' количество букв т -',x); end.

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