В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
спеш
спеш
14.03.2021 18:00 •  Информатика

НУЖНА ИНФОРМАТИКА ПОСТАВЛЮ КАЖДОМУ ВЕРНОМУ ОТВЕТУ КОРОНКУ ОБЕЩАЮ И ПОДПИШУСЬ,ТОЛЬКО ВЫРУЧИТЕ​


НУЖНА ИНФОРМАТИКА ПОСТАВЛЮ КАЖДОМУ ВЕРНОМУ ОТВЕТУ КОРОНКУ ОБЕЩАЮ И ПОДПИШУСЬ,ТОЛЬКО ВЫРУЧИТЕ​

Показать ответ
Ответ:
Natasha183038
Natasha183038
25.03.2021 15:22

1.var

N,a,b:integer;

 begin    

 a:=N;

b:=N-8;

     readln(a);

   write(a);

       write(b);

 end.

2.var

S,P, a,b:integer;

 begin

   read(a);

   read (b);

   begin

   P:=(a+b)*2;

  write('Периметр:',P); end;

  begin

  S:=a*b;  write('Площадь:',S); end;

 end.

3.

var

a,b,c:string;

 begin

    write('Как вас зовут?');

   readln(a);

   write('Сколько вам лет?');

   readln (b);

    write('Какой у вас номер телефона?');

      readln (c);

 

       write('Имя:',a);

  write('Возраст:',b);

   write('Номер телефона:',c);

 end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота