1. Информатика
  2. На языке pascal abc реализовать

На языке pascal abc реализовать программу, выводящую первых к нечётных чисел 1,3,5,. (к задаётся с клавиатуры).

Анастасия5451 Анастасия5451    1   31.08.2019 20:10    0

Ответы
ubfhbc ubfhbc  06.10.2020 08:23
Var
   k:integer;
Begin
Write('k = ');ReadLn(k);
For k:= 1 to k do
    Write(k*2-1,' ')
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
hasanovratmir3 hasanovratmir3  30.04.2020 13:54
Решите в течении часа, ТЕСТ 1 Какое значение будет напечатано в результате работы программы: a=3 b=-5 If a =b: a=a+7 else: b=b+4 x=a*b; print (x); 1.-15 2.-50 3.-3...
supervitalik15 supervitalik15  30.04.2020 13:55
Как мы сохраняем модель, разработанную в программе под соответствующим именем? (Skeatchup)...
86543949776944 86543949776944  30.04.2020 13:55
Чому під час розв язування різних задач для одного об єкта можуть бути складені різні моделі?...
Алижан07 Алижан07  30.04.2020 13:57
Побудуйте схему маршруту одноденної пішохідної екскурсії та опис історичних пам яток, пов язаних з подіями з історії України XVI-XVIII ст. та визначними історичними...
minikolp12344 minikolp12344  30.04.2020 14:09
Какие преимущества имеют мультимедиа приложения в образовании перед традиционной формой обучения...
Lina300333 Lina300333  30.04.2020 14:11
Як організувати розгалуження в Scratch?...
Не123098 Не123098  30.04.2020 14:11
Сравни устройство и назови их назначение​...
0304131 0304131  30.04.2020 14:13
Для хранения неотрицательных целых чисел (чисел без знака) выделена ячейка в 8 бит. Какое самое большое целое число может быть в нее записано? В качестве ответа Введите...
datskivvera1 datskivvera1  30.04.2020 14:13
Не могу справится с работой по информатике. Проверьте, есть ли ошибки....
макатернар1 макатернар1  30.04.2020 14:13
Пользователь вводит своё имя и рост. Если рост больше 174 сантиметров, то он годен в баскетбольную команду, если меньше то не годен. В программе питон 9 класс...

Популярные вопросы