Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

паскаль. Лінійний оператор.

5-9 класс

Людина бажає обклеїти шпалерами довгу стінку в своїй квартирі. Довжина стінки а м, а висота b м. Рулон шпалер має довжину 12 м і ширину 80 см. Скільки будуть коштувати шпалери для всієї стінки, якщо ціна одного рулону k грн.

Voprak00ok2 13 сент. 2014 г., 8:42:02 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Mike47
13 сент. 2014 г., 9:52:08 (9 лет назад)

var
  a, b, l, c, k: real;
  n: integer;

begin
  write('Введите ширину стены a и высоту стены b в метрах: ');
  readln(a, b);
  write('Введите стоимость рулона обоев k в гривнах: ');
  readln(k);
  {Определим, какой длины надо иметь полотно при ширине 0.8 м,
   чтобы оклеить им всю стенку}
  l := a * b / 0.8;
  {Определим, сколько потребуется рулонов при длине полотнища 12м}
  n := Trunc(l / 12);
  if l > 12 * n then n := n + 1;
  c := k * n;
  writeln('Стоимость обоев составит ', c:0:2, ' грн.')
end.

Тестовое решение:

Введите ширину стены a и высоту стены b в метрах: 6.5 2.6
Введите стоимость рулона обоев k в гривнах: 32.4
Стоимость обоев составит 64.80 грн.


Ответить

Другие вопросы из категории

Архиваторы - это: а) работники библиотеки, работающие с архивами; б) люди, создающие электронные библиотеки; в) программы, предназначенные для создания

электронных базы данных; г) программы, позволяющие сжимать информацию; д) ни одно из выше перечисленного.

Запишите числа в развёрнутой форме

10,0111(10)
10,10(2)
75,8(8)
АС,F(16)
Числа в скобках означают основание.

что такое информатика и ИТК

Читайте также

Паскаль, в его первоначальном виде, представляет собою чисто процедурный язык.

Простейшая программа на Паскале будет выглядеть следующим образом:
program upr;
begin
writeln ( ? ); {оператор вывода строки}
end.
Определи, какая фраза пропущена на месте вопросительного знака?
’Hello, World!’
“Lorem ipsum”
Just Another Perl Hacker

1)в какой структуре цикла операторы "тела" цикла обязательно выполняются хотя бы один раз?

2)В операторе while A do B, на месте B ставится?
3)Сколько раз выполнится цикл
A:=1;
while A<=5 do
A:=A+1;
4)В операторе while A do B; на месте A ставится?
5)Какой оператор в цикле должен присутствовать для правильного его завершения?
6) В какой из циклических структур операторы тела цикла не надо заключать в "операторные скобки"?
7)После выполнения операторов
K:=0;S:=0;
while K>10 do
S:=S+K;
K:=K+2;
Ps. Это все паскаль.

Задача в Паскаль.Операторы IF-else

Просто составить,запутался в операторах

«Введение в ЯП ПАСКАЛЬ, Линейные алгоритмы».

Вариант №2

Какие значения чисел:

0.85Е2, -5.7Е-3, 0.1Е4?

Пусть а=245, b=-435, c=35.126. Что будет выведено на экран после выполнения следующих команд:

writeln (‘a’, b, ‘c’); write (‘c=’,c:8:1);

write (‘b= ‘, b:6); writeln ((a+c):9:3, b:4)?

Запишите по правилам языка Паскаль такие выражения:

a)

b)

Вычислить значения выражений:

Round(frac(6.9));

20 mod 6 * 3;

sqrt(trunc(0.5)).

Записать выражения в общепринятой форме:

(-3ab+sqr(b-4*a*c))/sqrt(2*a);

(sqrt(abs(a-b))*sqr(a+b).

Если у – вещественная переменная, а х – целая, то какие из следующих операторов присваивания правильные, а какие нет и почему?

a) y:= y * 2; в) х:= х mod 3 + х*cos(0);

б) x:=trunc(y); г) x:= y+1.



Вы находитесь на странице вопроса "паскаль. Лінійний оператор.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.