Задать вопрос!

Задать вопрос!

Все категории

4 года назад

15

Дано натуральное число N, написать программу, которая выводит на экран последовательность квадратов чисел от 1 до N.

Информатика

1 ответ:

Лора19724 года назад

0 0

Program Pr1;
uses crt;
var i,n,p:integer;
Begin
clrscr;
readln(n);
for i:=1 to n do writeln(sqr(i));
end.

Читайте также

Определите количество информации в своей фамилии,при условии,что для кодирования фамилий будет использоваться 32-символьный алфа

54321anna

10 символов
32 = 2^5 => 5 бит/символ
10 * 5 = 50 бит

0 0

4 года назад

Пишите в рамки названия всех известных вам устройств которые могут быть подключены компьютеру обратите внимание на направление с

nastas

....................................................................

0 0

2 года назад

Прочитать ещё 2 ответа

По обвинению в ограблении банка перед судом предстали Джон, Билл и Марк. Следствием установлено, что: если Джон не виновен или Б

MichGi [78]

В любом случаем виновен Билл. Он в обоих случаях виновен

0 0

4 года назад

Прямоугольник, обрамляющий абзац: A)стиль B)интервал C)диаграмма D)рамка

Фиона Каинт

Правильный ответ рамка

0 0

4 года назад

Определить количество трехзначных натуральных чисел, сумма цифр которых равна заданному числу N

Хадис06 [36]

Var
    N, i, k, sum, t: integer;

begin
    readln(N);
    k := 0;

    for i := 100 to 999 do
    begin
        t := i;
        while t > 0 do
        begin
            sum := t mod 10;
            t := t div 10;
        end;
        if sum = N then k := k + 1;
    end;

    writeln(k);
end.

0 0

4 года назад