Категория
Информатика, опубликовано 04.04.2020 02:26

Дано целое число. Если оно является положительным, то прибавить к нему 39; в противном случае не изменять его. Вывести полученное число.

1. program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a < 0 then a:=a+39;
writeln(a);
readln;
end.

2. program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > 0 then a:=a;
writeln(a);
readln;
end.

3. program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > 0 then a:=a+39;
writeln(a);
readln;
end.​

Ответы

Ответ
Ответ оставил: Гость

Объяснение:

3 программа правильная

Ответ
Ответ оставил: Гость
потому что там образуется огненный шар
Ответ
Ответ оставил: Гость
150*64=9600
Ответ: 9600бит
Ответ
Ответ оставил: Гость
1) var A: array [1..6] of integer = (-125,200,10,6,43,11);
2) 6
3) 11


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 2 на вопрос по информатике: Дано целое число. Если оно является положительным, то прибавить к нему 39; в противном случае не изменять его. Вывести полученное число.1. program cislo;vara: integer;beginwriteln('Введи число a');readln(a);if a < 0 then a:=a+39;writeln(a);readln;end.2. program cislo;vara: integer;beginwriteln('Введи число a');readln(a);if a > 0 then a:=a;wri... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube