М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
konstantin1959
konstantin1959
12.08.2020 17:00 •  Информатика

Напишите программу на паскале: условие составить алгоритм вывода стоимости товаров в чеке до первой суммы, превышающей 1000 рублей.

👇
Ответ:
ZEROBONE
ZEROBONE
12.08.2020
Program Z_1;
uses crt;
var a,b,c,s: integer; {a,b,c- товары(если нужна стоимость с копейками поменяй integer на real, добавь переменные, если нужны еще товары), s-чек}
begin
while d<=1000 do begin
writeln('Введите стоимость товаров'); readln(a,b,c); {задается стоимость товаров с клавиатуры}
d:=a+b+c;
end;
writeln(d);
end.
4,4(56 оценок)
Открыть все ответы
Ответ:
kotflin
kotflin
12.08.2020
var   s : string[50];
  i, j, k : word;  
 f : boolean;  
function isSpace(ch : char) : boolean;
begin   isSpace := false;  
if ch = ' ' then isSpace := true;
end;  
begin   f := false;  
   repeat     j := 0;
    writeln('введите строку, состоящую из 2 слов');
    readln(s);    
for i := 1 to length(s) do    
   if isSpace(s[i]) then  
    begin    
     inc(j);      
   k := i;       end;
     if j =1 then f := true;
    until f;    
write(copy(s, k + 1, length(s)), ' ', copy(s, 1, k - 1)); 
end.
недавно такую писала :)
4,6(81 оценок)
Ответ:
vikshaaa
vikshaaa
12.08.2020

# 1)

n = float(input().replace(',', '.'))  # replace Чтоб 1,1245 например тоже можно было ввести.

print(abs(n))

print(round(n))

# 2)

n = int(input())

print('16-ричная:', hex(n).replace('0x', ''))

print('2-ичная:', bin(n).replace('0b', ''))

# 5)

country = input()

city = input()

house = input()

number = input()

print(country, city, house, number, sep=' ') # Вывести через проел (по умолчанию)

# 6)

print("""Україна - рідний край

Поле, річка, синій гай,

Любо стежкою іти

Тут живемо я і ти!""")

a = 'Щоб завершити натисніть кнопку Enter'

input(a)

4,5(59 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ