Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
LiamPeyn
19.05.2021 19:38 •
Информатика
Поставьте программу для вычисления периметра прямоугольника
👇
Увидеть ответ
Ответ:
iliasnurdos
19.05.2021
Var p,a,b:integer;
begin
writeln ('Введите стороны прямоугольника a и b');
readln (a,b);
p:=(a+b)*2;
writeln ('Периметр прямоугольника равен ',p);
end.
4,4
(21 оценок)
Открыть все ответы
Ответ:
дима22819
19.05.2021
Var a: byte; b:integer;
Begin
writeln('Введите день месяца');
readln(b);
writeln('Введите номер месяца');
Readln(a);
Case a of
1: writeln(b,' янавря');
2: writeln(b,' февраля');
3: writeln(b,' марта ');
4: writeln(b,' апреля ');
5: writeln(b,' мая');
6: writeln(b,' июня ');
7: writeln(b,' июля');
8: writeln(b,' августа');
9: writeln(b,' сентября');
10: writeln(b,' октября');
11: writeln(b,' ноября');
12: writeln(b,' декабря');
else writeln('Месяца №', a,'нет');
end;
end.
4,4
(67 оценок)
Ответ:
fogive
19.05.2021
#include <iostream>
#include <iomanip>
using namespace std;
int main() {
int n,k,ind;
cout<<"n = "; cin>>n;
string a[n][3];
string inp;
for (int i=0; i<n; i++) {
cout<<"record number: "<<i+1<<endl;
cout<<"name: "; cin>>a[i][0];
cout<<"letter: "; cin>>a[i][1];
cout<<"password: "; cin>>a[i][2];
}
cout<<endl;
cout<<"letter: "; cin>>inp;
k=0;
for (int i=0; i<n; i++)
if (a[i][1]==inp) {
k=1; ind=i;
}
if (k==0) cout<<"no letter "<<inp<<endl;
else {
cout<<"password: "; cin>>inp;
if (inp!=a[ind][2]) cout<<"not valid password"<<endl;
}
system("pause");
return 0;
}
4,5
(26 оценок)
Это интересно:
К
Кулинария-и-гостеприимство
05.10.2020
Как хранить тыкву: сохраняем вкус и пользу на долгое время...
С
Семейная-жизнь
11.11.2020
Как восстановиться после аборта: полезные советы и рекомендации...
Х
Хобби-и-рукоделие
17.01.2023
Покраска чугуна: советы от профессионалов...
О
Образование-и-коммуникации
13.09.2022
Как легко и быстро спрягать испанский глагол hacer...
С
Стиль-и-уход-за-собой
03.11.2020
Описание людей: как правильно выбрать слова...
К
Компьютеры-и-электроника
15.02.2020
Как нарисовать шар в GIMP?...
О
Образование-и-коммуникации
15.08.2020
Лучшие способы наблюдения за звездами с комфортом...
К
Компьютеры-и-электроника
08.01.2022
Как превратить видео в живые обои на Android...
О
Образование-и-коммуникации
26.09.2021
Как понимать людей: психологические аспекты взаимодействия...
К
Компьютеры-и-электроника
19.07.2021
Как контролировать контент на YouTube с помощью блокирования по ключевым словам?...
Новые ответы от MOGZ: Информатика
kopilge
07.03.2023
A Обзор урока ТЕКСТ ЗАДАНИЯ держание урока Установи соответствие между блоками программного кода и названиями датчиков Количество связей: 4 дание No1 дание No2...
hdl7
08.12.2020
Задание 1; Найди соответствие Для каждого типа данных выбери два соответствующих значения 85 true Proba 150 1.58 Hello false 5.8 str int float boolean Задание 2...
24.02.2020
Я скоро разорюсь на этом задании Создайте в MS Access базу данных учеников Домашней школы. База данных должна содержать данные об учениках: фамилия, имя, отчество,...
11111Ангелина11111
19.09.2020
Для записи текста использовался 64-символьный алфавит. какое колисество информации в байтах содержит 3 страницы текста, если на каждой странице расположено 40 строк...
Mashoo4rik
02.04.2023
В летнем лагере на каждого участника полагается 50 г сахара в день. В лагере X человека. Какого наименьшего количества килограммовых пачек сахара достаточно на...
Х1ега1Х
18.02.2020
Расскажите о встрече с гердой и ! ! всё !...
lalalala777
18.02.2020
За 1 кг и 200 гр конфет заплатили 324 тг сколько будет стоить 2 кг таких конфет?...
NoName2281111
18.02.2020
Две целых четыре десятых делим на одну пятую или 2,4/1 5...
ankreinas
18.02.2020
(20 ) на новогоднем утреннике 35 надели маски котят и тигрят.сколько котят и сколько тигрят веселились на утреннике,если мяукающих было на 4 больше,чем рычащих...
Shaoqidu
18.02.2020
Напиши письмо деду морозу с обращениями...
MOGZ ответил
Какая из дробей больше? 3пятых 5третых и 3целых пять десятых...
Кого тебе было больше всего жалко в рассказе Астафьева Белогрудка...
Вынесите множитель под знак корня, 4корень3, 0.1корень13, 1дробь7корень98,...
Какими показани все неровности земли и дна океана? Приведи конкретные...
Один из крупнейших по численности населения субъект РФ, однако...
Задача 1. До поліклініки звернувся працівник свиноферми зі скаргами...
Государство южных славян, завоёванное турками...
Тема: Разложение многочлена на множители с формул сокращённого...
‐0,021:30= 12,76:(-1,1)= 17:25= 17,1:40=...
Отметь уравнения для которых x = 1, y = 0 - корень 1. x + 4y...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
begin
writeln ('Введите стороны прямоугольника a и b');
readln (a,b);
p:=(a+b)*2;
writeln ('Периметр прямоугольника равен ',p);
end.