1. Информатика
  2. Составить и записать программу

Составить и записать программу подсчета стоимости покупок не менее 10 видов товара.

artem2006sokol artem2006sokol    3   09.03.2019 00:40    1

Ответы
kristinakwai kristinakwai  24.05.2020 08:39

Pascal

 

program tovar;

var i,k:integer; t,s:real;

begin

s:=0; 

writeln ('Vvedit kol-vo tovara');

readln (k);

for i:=1 to  k do

begin

writeln ('Vvedit stoimost',i,'-go tovaru');

readln (t);

s:=t+s;

end;

writeln ('stoimost pokupok-',s);

readln

end. 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Петуч Петуч  29.06.2019 13:50
Основным назначением программы wordpad является( укажите неверный ответ): а) создание и просмотр документа неограниченного размера б) работа с документами не только типа .txt,...
Катя709015 Катя709015  20.08.2019 18:30
Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b – целые числа),...
aizmesteva aizmesteva  20.08.2019 18:20
Напишите программу с формулы и запишите формулу, используя правила записи pascal: s=(a2 +b)h/2(a-b)+4...
gleb217 gleb217  15.07.2019 02:10
Составьте кроссворд из шести слов, чтобы в выделенных клеточках получилось слово состав...
Dеn4ik Dеn4ik  15.07.2019 02:10
Случайным образом заданы 10 чисел от 1 до 100 , надо написать программу , которая выберет среди них все двузначные. язык програмирования паскаль. заранее...
tka4ukilia2017 tka4ukilia2017  30.07.2019 23:10
Вмассиве z длины m обнулить значение минимального элемента. определить количество отрицательных элементов массива...
ivanivankuznets ivanivankuznets  30.07.2019 23:10
Много ! на вход программы подается точка k (a; b), a и b - координаты точки соответственно. нужно определить, принадлежит ли данная точка прямой y=5x+7 или не принадлежит....
sofi190 sofi190  03.02.2021 01:22
Каждый объект, зарегистрированный в информационной системе, получает уникальный код, состоящий из двух частей. Первая часть определяет категорию объекта и состоит из 5 символов,...
Арчи171 Арчи171  03.02.2021 01:20
Здравствуйте, почему у меня 2 гигабайта видеопамяти, но используется 1.95 гигабайтов?​...
HELP111111111111q HELP111111111111q  03.02.2021 01:00
В каком из операторов допущена синтаксическая ошибка:1. For i=1 to 10 do s:=s+1;2. For i:=10 downto 5 do s:=s+1;3. While i =3 do s:=s+1;4. Repeat s:=s+1 until s 7;...

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