срооооооооооооооооочноооооооооооооохотябы что то
Срооооооооооооооооочноооооооооооооо
хотябы что то
1 ответ
Тер-Оганезова
Ольга
1)
- program p1;
- var F,D:integer;
- begin
- F:=3;
- D:=7;
- writeln('Число F = ',F,', а число D = ',D);
- end.
2)
- program p2;
- var C,S:integer;
- begin
- readln(C,S);
- writeln('Число S= ',C,' и является целым числом.');
- writeln('Число S= ',S,', число S тоже целое число.');
- end.
3)
- program p3;
- var X,Y,Z:integer;
- begin
- X:=23;
- Y:=16;
- Z:=X-Y;
- writeln('Разность=',Z);
- end.
4)
- program p4;
- var X,Y,Z:integer;
- begin
- readln(X,Y);
- Z:=X*Y;
- writeln('Творение=',Z);
- end.
5)
- program p5;
- var X,Y,Z,S:integer;
- begin
- readln(X,Y,Z);
- S:=X+Y+Z;
- writeln('Сумма=',S);
- end.
6)
- program p6;
- var N,m:integer;
- begin
- readln(N);
- m:=(N-3)*6;
- writeln('Масса=',m,' кг');
- end.
7)
- program p7;
- var X,Y,Z:integer;
- begin
- readln(X,Y);
- Z:=X-Y;
- writeln(Z,' грибов собрал Коля');
- end.
8)
- program p8;
- var X,T,S:integer;
- begin
- readln(X,T);
- S:=(X+3)*T;
- writeln(S,' км прошла лодка за ',T,' час(ов)');
- end.
9)
- program p9;
- var H,K,C,Y,O:real;
- begin
- readln(H,K,C,Y);
- O:=((H*100+K)-(C*Y))/100;
- writeln(O,' рублей осталось у Маши');
- end.
10)
- program p10;
- var x,y:real;
- begin
- readln(x);
- y:=5*x-7;
- writeln('Итог ',y);
- end.
Ленка Ченчикова
(через пару минут ещё добавлю)
Софья
от души
Агата Пакуева
спаксибо для тебя
Вадим Фурдюк
спасибо*
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Здравствуйте. Нужен цитатный план испытания лётчика в лесу главы2-13 по повести
Разные вопросы.
Я хочу найти решение и ответ для этой задачи и получить
Математика.
Здравствуйте
Меня зовут Виталий, я AdOps-аналитик компании Adfinity.pro
Заинтересовал ваш проект obrazovalka.com
Думаю сможем увеличить
Разные вопросы.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
В семье из трех человек три электронных устройства: ноутбук, планшет и
Разные вопросы.
Жаркыраган кашка маш жаралгандан ашка маш табышмак жообу менен
Кыргыз тили.
За лето подруги прочитали 48 книг.Причем Оля прочитала в 3 раза
Математика.
Периметр равнобедренного треугольника ABC (AB=BC) равен 34 см. Периметр треугольника ABM,
Разные вопросы.
«Металлическая болванка, нагрета до 420C, охлаждается в воздухе, температура которого 20C,
Алгебра.
Облако тегов