Создайте программу в паскале, которая будет выводить на экран числовой ряд из 10 элементов, начиная с цифры 2, каждый элемент должен быть в 2 раза предыдущего. должно работать так: окно вывода: 2 4 8 16 32 64 128 256 512 1024
220
383
Ответы на вопрос:
Var a,i: integer; begin a: =1; for i: =1 to 10 do begin a: =a*2; write(a,' '); end; end. результат: 2 4 8 16 32 64 128 256 512 1024
Var tfh,h,m,c: integer; begin writeln('введите количество суток'); readln(tfh); writeln('в ',tfh, ' сутках: '); h: =tfh*24; writeln(h,' часов'); m: =h*60; writeln(m,' минут'); c: =m*60; writeln(c,' секунд'); end.
Популярно: Информатика
-
Fara22822905.01.2020 05:16
-
DaniilTatarinov07.07.2021 20:58
-
vikaganzha16.04.2020 07:13
-
Doplis22.06.2021 07:39
-
kristinэ03.08.2022 06:18
-
dashabur200504.03.2023 09:55
-
Айла201027.06.2022 17:59
-
leeesy66422.12.2021 12:25
-
Камилия31125.12.2020 22:58
-
kolyaan32122.01.2023 20:46