Записать программу в Паскаль. Помогите,пожалуйста

0 голосов
19 просмотров

Записать программу в Паскаль. Помогите,пожалуйста


image

Информатика (146 баллов) | 19 просмотров
Дан 1 ответ
0 голосов

// PascalABC.Net

var n: integer;

o: string;

begin

   n := 10000;

   o := '';

   

   while n >= 8 do

   begin

       o := (n mod 8) + o;

       n := n div 8;

   end;

   o := n + o;

   

   writeln(o);

end.

(4.3k баллов)
0

Здравствуйте, не могли бы глянуть, верно записана формула или нет?

0

Вованичикчка, можете помочь с программированием на питоне? Подождите, я вам сейчас скину задачи? Поможете их решить?

0
0

Вованичикчка, поможете?

0

Человек с 1 Мая не помогает никому, вряд-ли и щас поможет...