1. Информатика
  2. Впрограмму вводится стоимость

Впрограмму вводится стоимость 1 кг. конфет,написать программу,с оператора for которая выводит на экран стоимость 1,2,3,4,5,6,7,8,9,10 кг.конфет)

iriska198501 iriska198501    1   05.06.2019 18:40    0

Ответы
Lakers44 Lakers44  01.10.2020 19:56
Var a:real;
i:integer;
begin
writeln ('Введите стоимость 1 кг. конфет:');
readln (a);
for i:= 1 to 10 do
writeln (i*a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kotlarovaira9 kotlarovaira9  20.05.2021 22:24
Опрацювання табличних даних...
nikitamarar2177 nikitamarar2177  20.05.2021 22:23
Типо смотри Тема Текст на веб=стр Написать скрипт, где будут формулы сокращенного умножения. язык HTML и делай странички: с текстом, графикй, вставкой рисунка, таблицы....
karimjan96961 karimjan96961  20.05.2021 22:23
На языке ПАСКАЛЬ 1. Составить программу, которая сформирует двумерный массив, состоящий из 3-х строк и 4-х столбцов из целых случайных чисел из интервала (-50;50)...
Кристина15551 Кристина15551  20.05.2021 22:20
Написать код на C++ Дано целое число K, а также K наборов ненулевых целых чисел. Каждый набор содержит не менее двух элементов, признаком его завершения является число...
татар13 татар13  20.05.2021 22:18
ВОООТ НААА Гіперпосилання передбачає два об єкти: до якого прив язують гіперпосилання та на яке воно вказує (мал. 152).Щоб додати гіперпосилання в редакторі презентацій...
aibergenova198 aibergenova198  20.05.2021 22:18
Промежуточная итоговая аттестация по информатике за курс 10 класса ученика(цы) 10 классавариант 11. Запишите арифметическое выражение, соответствующее этому дереву,...
lycena lycena  13.04.2020 23:25
Запишите, что получится в результате работы данной программы PROGRAM PRIMER; VAR X,Y:REAL; BEGIN FOR X:=1 TO 11 DO BEGIN Y:=X*X*X; WRITE (‘ОТВЕТ ЗАДАЧИ’), Y; X:=X+1;...
Kyrylo13 Kyrylo13  22.05.2019 05:00
10000000; 11111111; 110111; перевести из двоичной системы в десятичную( с решением)...
Элис6666666666 Элис6666666666  22.05.2019 05:00
Определить если в заштрихованной области массива элемент равный а (массив имеет размерность n*n)....
emin77 emin77  16.06.2019 13:00
Pascal.(34б) если все элементы одномерного массива положительные то вывести сообщение условие выполняется иначе условие не выполняется дан массив из n элементов. определить...

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