1. Информатика
  2. Дан диаметр окружномти

Дан диаметр окружномти d. найти ее длину l=p*d. в качестве значения p использовать 3, 14

Fkbyfitdxtyrj Fkbyfitdxtyrj    3   23.06.2019 04:20    0

Ответы
shamshievoleg shamshievoleg  19.07.2020 06:49
var l, p, d: real;
label undf;

begin
undf: writeln('Введите диаметр окружности:');
readln( d );
p := 3.14;
l := p * d;
writeln( 'Длина равна ', l );
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
innassss innassss  04.08.2019 00:20
Надо придумать 3 на знание клавиатуры....
kenanyusifov02 kenanyusifov02  21.05.2021 12:50
Найти косинус минимального из 4 заданных чисел Python...
Alexandro1888 Alexandro1888  04.04.2020 23:21
На рисунке приведен фрагмент электронной таблицы. В ячейку D3 введена формула =B2-$A$1. Какое число появится в ячейке С4, если скопировать в нее формулу из ячейки D3?...
pupil80022225 pupil80022225  04.04.2020 23:43
1)Построить график функции в Excel. 2)Построить поверхность в Excel....
Gremlin222 Gremlin222  04.04.2020 23:30
Ал­го­ритм вы­чис­ле­ния зна­че­ния функ­ций F(n) и G(n), где n – на­ту­раль­ное число, задан сле­ду­ю­щи­ми со­от­но­ше­ни­я­ми:F(1) = 2F(n) = F(n–1) · F(n–1)+ F(n–1) · n...
liliverbovetska liliverbovetska  18.05.2020 11:51
Текст содержит 12 строчек по 48 символов. Каждый символ кодируется с бит информации. Какой объем памяти занимает этот текст на компьютере? ​...
Александра030307 Александра030307  18.05.2020 11:51
Запишите значение переменной S, полученное в результате работы следующей программы. Var s,k: integer; Begin s := 0; for k := 3 to 8 do s := s + 7; writeln(s); End....
Jaims Jaims  18.05.2020 11:51
Здравствуйте. Требуется в переводе кода. Надо перевести данный код паскаля в код питона: var n,i,a,min: integer; begin readln(n); min := 30001; for i := 1 to n do begin readln(a);...
toriblinova toriblinova  18.05.2020 11:51
сделать 2 задачи по информатике (3-4 если сможете Задача 1. Каков информационный вес сообщения в Кбайтах: «Сегодня прекрасная погода, светит солнце!» (кавычки за символы не...
Alihan1970 Alihan1970  18.05.2020 11:51
Определить последнюю цифру натурального числа N, задаваемого случайным образом из промежутка [0;100)...

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