Опубликовано 03.01.2018 по предмету Информатика от Гость

В Паскале
напечатать числа в виде следующей таблицы
0 6 5 4 3 2
1 0 5 4 3 2
2 1 0 4 3 2
3 2 1 0 3 2
4 3 2 1 0 2

Ответ оставил Гость


var  k, n, x, y, i: integer;
begin
k := 1; 
n := 100000; 
y := 65432; 
for i := 0 to 4 do
    begin
    x := k * i + x;
    k := k * 10;
    y := y mod n;
    n := n div 10;
    writeln(x:1, :8 - i, y)
    end
end.

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы
Самые новые вопросы