Задать вопрос!

Задать вопрос!

Все категории

3 года назад

10

Ребят 29 баллов дам за решение срочненько , по братски помогите

Ребят 29 баллов дам за решение срочненько , по братски помогите

Информатика

1 ответ:

Ирина Стах3 года назад

0 0

нач

цел F,D,k

ввод (F,D)

если D > 0 то

k = F*D +8*D

иначе

k=(D+F)*(D+F)+5*D

кон

Читайте также

Какое слово начинается на А заканчивается на К

natalygovoruhina

Это слово-Аммиак, но существует множество таких слов.

0 0

4 года назад

Нужно составить блок-схему и программу в паскаль. помогите пожалуйста, очень надо))))

Александра Егорова

//PascalABC.Net 3.2
function f(x:real):=1/(x*sqr(x)-2*x);
begin
write ('y=', f(readreal('Введите x: ')));
end.

Алгоритмический язык:
нач
ввод (x);
вывод (1/x^3-2x);
кон

0 0

4 года назад

Какие то программу,которая считает в строке все символы А и заменяет их на символ В В паскале

Олег Андриенко

Var a:string; i,d:integer;
Begin
Readln (a);
d:=length (a);
For i:=1 to d do
If a[i]='A' then a[i]:='B';
Writeln (a);
end.

0 0

4 года назад

|ДАМ МНОГО БАЛЛОВ| СРОЧНОнаписать код на языке паскаль,перевод дюймы в сантиметры.

Konstantinovich [428]

Program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
write ('Введите количество дюймов: ');
readln(d);
s := d*m;
writeln (d, ' дюймов = ', s, ' сантиметров')
end.

Упрощенный вариант:
program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
readln(d);
s := d*m;
writeln (s)
end.

0 0

4 года назад

Прочитать ещё 2 ответа

Ввести два числа, если их произведение отрицательно, то умножить его на -2, в противном случае умножить на 3

se252328

Я сделала на картинке в прикрепленном файле

0 0

3 года назад