Составить программу выполняя которую машина выведет на экран все целые числа от а до б program primer war a: inter; begin a: = b
288
290
Ответы на вопрос:
Program z1; var a, b, c: integer; begin writeln('введите начало диапазона: '); readln(a); writeln('введите конец диапазона: '); readln(b); while a < b do begin inc(a); writeln(a); end; end.
Program primer; var a,b,i: integer; begin readln(a,b); for i: =a to b do write(i,' '); end.
Вмагазине в первый день продали 25 шоколадок, 50 мандаринов и 135 коробок печенья. а во второй день продали продуктов на 160 р больше чем вчера, купив : 50 шоколадок 100 мандаринов и 135 коробок печенья. сколько денег заработал магазин в 1 день и во второй, если 1 коробка печенья стоит 30 p. 25 шоколадок стоят 40 р а 25 мандаринов 60 р. p.s. решение 40 + (60 + 60) + (30 * 135) = 4165 - 1 день 4165 + 40 + 160 = 4365 - 2 день
Популярно: Информатика
-
Елизавета65112.03.2021 04:25
-
Krest00720.12.2020 03:40
-
trunczova8413.02.2023 09:07
-
dvika1203.02.2022 05:21
-
vovakornev200201.02.2023 08:24
-
Agent159701.03.2023 05:23
-
malia2009200414.04.2023 02:51
-
Olka190927.09.2022 01:44
-
Markiza1106.04.2021 08:01
-
ladakorobova25.02.2021 20:50