Помогите решить в паскале задачи 2,3,4. Created by IIIKOJIHIK. informatika-ru

Помогите решить в паскале задачи 2,3,4...

IIIKOJIHIK @IIIKOJIHIK

June 2022 1 9 Report

Помогите решить в паскале задачи 2,3,4

Answers & Comments

petyaGavrikov

Verified answer

2)
var x:integer;
begin
readln(x);
if x mod 2=0 then writeln('Число четное')
else writeln('Число нечетное');
end.

Пример:
15
Число нечетное

3)
var x:integer;
begin
readln(x);
if x>0 then writeln('У вас ',x,' рублей')
else writeln('счет пуст');
end.

Пример:
15
У вас 15 рублей

4)
var x:integer;
begin
readln(x);
if x>0 then writeln('Число положительное')
else writeln('Число отрицательное');
end.

Пример:
15
Число положительное

2 votes Thanks 1

IIIKOJIHIK Спасибо огромное

petyaGavrikov Пожалуйста. Пользуйтесь кнопочкой "Спасибо".

Answers & Comments

Verified answer

otec bolen gemofiliej mat nositelnica gena gemofilii kakimi budut ih deti

opredelite predlozhenie v kotorom oba vydelennyh slova pishutsya slitno raskrojte91a4e70bc3a9725ca0af630e694c6004 57096

reshit sistemu uravnenij primenyaya teoremu obratnuyu teoreme vietta xy 30 xy

ispolzovanie seti internet v processe prepodavatelskoj deyatelnosti pozvolyaet8c7521130a3991a197a7553141a75533 29725

ispolzovanie kompyutera uchitelem dlya organizacii uchebnogo processa na urovne kl

za otvet 35 ballov sdelajte analiz pesni i tuda gora i syuda gora

za otvet 15 ballov sdelajte pozhalujsta analiz pesni

3...

sin2 x cos2 xnajti proizvodnuyu

sinxcosx2najti proizvodnuyu

рекомендуемые вопросы

Helpful Links

Helpful Social