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

напишите программу на паскаль программе на вход подаются 2 натуральных числа первое F количество футов второе д количество дюймов программа должна вывести строку содержащую вещественное число равное количество метров в футах и дюймах формат числа 2 знака после запятой пример строки вывода переведён текстовые данные 6 2 6'2" = 1,88т ответе перед и после знака "=" равно один пробел после количество футов одинарная кавычка после дюймов двойная кавычка​

👇
Ответ:
ARMY130613
ARMY130613
28.06.2021

program Chernovik;

var f,d:integer;

begin

read (f,d);

writeln(f,,d,,' = ',(d/12+f)*0.3048:0:2)

end.

Объяснение:

При удвоении символа ' Паскаль перестаёт воспринимать его как служебный символ

1 фут = 12 дюймов

1 фут = 0,3048 м

Форматированный вывод - после второго двоеточия указывается количество символов после запятой

Если нужно указать переменную для вещественного числа:

program Chernovik;

var f,d:integer;

m:real;

begin

read (f,d);

m:=(d/12+f)*0.3048;

writeln(f,,d,,' = ',m:0:2)

end.

4,5(18 оценок)
Открыть все ответы
Ответ:

1 (истинное высказывание)

Объяснение:

((2*2=4) V (3*3=10)) & ((2*2=5) V (3*3=9)) = (1 V 0) & (0 V 1) = 1 & 1 = 1

(2*2=4) = 1 (истинное высказывание, т.к. 2 * 2 = 4)

(3*3=10) = 0 (ложное высказывание, т.к. 3 * 3 ≠ 10)

(2*2=5) = 0 (ложное высказывание, т.к. 2 * 2 ≠ 5)

(3*3=9) = 1 (истинное высказывание, т.к. 3 * 3 = 9)

Общий порядок действий:  

1) скобки

2) НЕ (¬, черта над выражением) - значение противоположно исходному высказыванию  (здесь нет)

3) И (&, ∧) - истинно, когда оба исходных высказывания истинны  

4) ИЛИ (∨) - ложно, когда оба исходных высказывания ложны  

4,4(59 оценок)
Ответ:
mrzadvorgetski
mrzadvorgetski
28.06.2021
Uses 
GraphABC; 

begin 
SetPenColor(ClGreen); 
Line(100,100,120,140); 
Line(100,100,80,140); 
Line(80,140,120,140); 
Line(100,140,70,190); 
Line(100,140,130,190); 
Line(70,190,130,190); 
Line(100,190,50,250); 
Line(100,190,150,250); 
Line(50,250,150,250); 
FloodFill(100,160,clGreen); 
FloodFill(100,130,clGreen); 
FloodFill(100,200,clGreen); 
Line(300,100,320,140); 
Line(300,100,280,140); 
Line(280,140,320,140); 
Line(300,140,270,190); 
Line(300,140,330,190); 
Line(270,190,330,190); 
Line(300,190,250,250); 
Line(300,190,350,250); 
Line(250,250,350,250); 
FloodFill(300,160,clGreen); 
FloodFill(300,130,clGreen); 
FloodFill(300,200,clGreen); 
Line(500,100,520,140); 
Line(500,100,480,140); 
Line(480,140,520,140); 
Line(500,140,470,190); 
Line(500,140,530,190); 
Line(470,190,530,190); 
Line(500,190,450,250); 
Line(500,190,550,250); 
Line(450,250,550,250); 
FloodFill(500,160,clGreen); 
FloodFill(500,130,clGreen); 
FloodFill(500,200,clGreen); 
end.
4,6(58 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ