Регистрация
Щерсть
23.05.2022 15:07
Информатика
Есть ответ 👍

Паскаль 34 .паскаль.необходимо составить программу вычисления стоимости покупки с учетом скидки. скидка в 3% предоставляется в том случае, если сумма покупки больше 500 рублей, в 5% — если сумма больше 1 000 рублей. формат входных данных: вводится целое число xx (0≤x≤2 в31 степени −1) — стоимость покупки до скидки. формат выходных данных: выведите стоимость покупки c учетом скидки в рублях с округлением до целых в меньшую сторону.

232
367
Посмотреть ответы 2

Ответы на вопрос:

tasinas
tasinas
4,5(61 оценок)
Var st,sk: integer; begin readln(st); if st> 1000    then sk: =trunc(st*0.95)   else if st> 500 then sk: =trunc(st*0.97)                 else sk: =st; writeln(sk); end. пример: 3000 2850
ukrainskayaa
ukrainskayaa
4,8(56 оценок)
Пифагоровыми числами называются числа, для которых выполняется равенство a²+b²= c ². //pascalvar  i, j, k: integer; begin  for i : = 1 to 20 do      for j : = i to 20 do          for k : = j to 20 do if i * i + j * j = k * k then writeln(i: 4, j: 4, k: 4);   end.

Популярно: Информатика