Есть ответ 👍

Вчом ошибка: //fpc 3.0.0 program fizika; uses crt; var num,a,b,c,d,e,i,f,g,h,j,k,r,t : intenger; begin clrscr; writeln('введите число №1: '); readln (a); writeln('введите число №2: '); readln (b); writeln ('1) швидкість'); writeln ('2) шлях'); writeln ('3) час '); writeln ('4) густина '); writeln ('5) маса '); writeln ('6) обєм '); writeln ('7) висота '); writeln ('8) площа '); writeln ('9) сила тяжіння'); writeln ('10) маса '); writeln ('11) прискорення вільного падіння '); writeln('введите число от 1 до 11: '); readln (num); c: =a/b; d: =c*b; e: =d/c; i: =a/b; f: =i*b; g: =f/i; h: =a/b; j: =a/h; k: =a*b; r: =k/b; t: =k/r; case num of 1: writeln ('швидкість дорівнює: ') (c) ('м/с'); 2: writeln ('шлях дорівнює: ') (d) ('м'); 3: writeln ('час дорівнює: ') (e) ('c'); 4: writeln ('густина дорівнює: ') (i) ('кг/м3'); 5: writeln ('маса дорівнює: ') (f) ('кг'); 6: writeln ('обєм дорівнює: ') (g) ('м3'); 7: writeln ('висота дорівнює: ') (h) ('м'); 8: writeln ('площа дорівнює: ') (j) ('м2'); 9: writeln ('сила тяжіння дорівнює: ') (k) ('н'); 10: writeln ('маса дорівнює: ') (r) ('кг'); 11: writeln ('прискорення вільного падіння дорівнює: ') (t) ('н/кг'); end; readln end.

227
239
Посмотреть ответы 2

Ответы на вопрос:


program fizika;

uses crt;

var num,a,b,c,d,e,i,f,g,h,j,k,r,t: integer;

begin

clrscr;

writeln('введите число №1: ');

readln (a);

writeln('введите число №2: ');

readln (b);

writeln ('1) швидкість');

writeln ('2) шлях');

writeln ('3) час ');

writeln ('4) густина ');

writeln ('5) маса ');

writeln ('6) обєм ');

writeln ('7) висота ');

writeln ('8) площа ');

writeln ('9) сила тяжіння');

writeln ('10) маса ');

writeln ('11) прискорення вільного падіння ');

writeln('введите число от 1 до 11: ');

readln (num);

c: =a div b;

d: =c*b;

e: =d div c;

i: =a div b;

f: =i*b;

g: =f div i;

h: =a div b;

j: =a div h;

k: =a*b;

r: =k div b;

t: =k div r;

case num of

1: writeln ('швидкість дорівнює: ', c, ' м/с');

2: writeln ('шлях дорівнює: ', d, 'м');

3: writeln ('час дорівнює: ', e, 'c');

4: writeln ('густина дорівнює: ', i, 'кг/м3');

5: writeln ('маса дорівнює: ', f, 'кг');

6: writeln ('обєм дорівнює: ', g,'м3');

7: writeln ('висота дорівнює: ', h,'м');

8: writeln ('площа дорівнює: ', j, 'м2');

9: writeln ('сила тяжіння дорівнює: ', k ,'н');

10: writeln ('маса дорівнює: ', r, 'кг');

11: writeln ('прискорення вільного падіння дорівнює: ', t,'н/кг');

end;

end.


ответ:

баннер, плакат, реклама, вывеска, что то из этих.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS