ПОМОГИТЕ... чем быстрее тем лучше :)
5-9 класс
|
1
var
a: real;
begin
write('Vvedite chislo: ');
readln(a);
if a > 10 then a:=a/2 else a:=a*5;
writeln('A = ', a:2:1);
readln;
end.
2
var
a, b: integer;
c: real;
begin
write('Vvedite chislo 1: ');
readln(a);
write('Vvedite chislo 2: ');
readln(b);
c:=a+b;
if c > 100 then c:=c/2 else c:=c*2;
write('C = ', c:3:1);
readln;
end.
1. var a:integer;
b:real;
begin
read(a);
if a>10 then
b:=a/2
else
b:=a*2;
writeln(b);
end.
Другие вопросы из категории
вернётся в исходное положение.
3)для парикмахера 4)для ученика 3 класса. С помощью каких программ выполняется большинство операций по обслуживанию безопасности компьютера? 1)архиваторов 2)нтивирусных программ 3)файловых менеджеров 4)утилит помогите пожалуйста!
человека: у одного рост 2,5 аршина, у второго – 32,2 вершка, у третьего – 198 см. Найти средний рост.
(Справка: 1 аршин = 16 вершкам = 71,12 см)
Читайте также
ЭТО ПРАВДА ОЧЕНЬ НУЖНО И ЧЕМ БЫСТРЕЕ, ТЕМ ЛУЧШЕ)
Объясните, пожалуйста, как мне сделать эти номера)
У меня на компьютере все папки есть, которые требуют в заданиях ( я про каталог Антона Павловича Чехова и т.д.), но только я понятия не имею, как это делать:(
Объясните, пожалуйста, если не сложно, конечно)
ЭТО СРОЧНО НУЖНО)
и тупое описание некоторых мессенждеров только мозгов хватило. Чем больше-тем лучше
правильнее))Заранее спасибо.
"или",то есть дизьюнкция(сложение). Прошу,помогите,кто в теме...
местами наибольше элемент с наименьшим.Распечатать полученный