profile
Опубликовано 5 лет назад по предмету Информатика от nitkazuev

5-7 задание. Написать программы в PascalABC.

  1. Ответ
    Ответ дан raf1O5

    5.                                                      

    program raf105;

    var i,n:integer;

    begin

    write('Введите N: ');

    readln(n);

    for i:=1 to n do

     writeln('7');

    end.

    6.                                                      

    program raf105;

    var  

     i: integer;

     pro: real;

    begin

    pro:= 1;

    for i:=1 to 20 do

    pro*= i;

    writeln('Произведение первых 20 чисел: ',pro);

    end.

    7.                                                      

    program raf105;

    var i,sum: integer;

    begin

    for i:=1 to 15 do

    sum+= i;

    writeln('Сумма первых 15 чисел: ',sum);

    end.

Самые новые вопросы
Носкова Анастасия
Другие предметы - 5 лет назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Наумова Надя
Другие предметы - 5 лет назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

Сазонова Анастасия
История - 5 лет назад

Кто такой мильтиад и какова его роль в победе над персами?

Тетерина Татьяна
История - 5 лет назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

Попова Полина
География - 5 лет назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.