Помогите по информатике)))). Created by 25467. informatika-ru

Помогите по информатике))))...

August 2021 1 5 Report

Помогите по информатике))))

Answers & Comments

Bakalavr 1) 3
2) 1 2 3 4 5
3)
Program name;
var i:integer;
begin
for i:=1 to 6 do writeln('Ваше Имя');
end.
4)
a)
б)
Program name;
var i,sum:integer;
begin
sum:=0;
for i:=20 to 40 do sum:= sum+i;
writeln(sum);
end.
в)
Program name;
var i,sum:integer;
begin
sum:=0;
for i:=40 to 70 do sum:= sum+i;
writeln(sum);
end.
г)
Program name;
var i,sum:integer;
begin
sum:=0;
for i:=30 to 60 do if i mod 2 = 0 then sum:= sum+i;
writeln(sum);
end.
д)
Program name;
var i,sum:integer;
begin
sum:=0;
for i:=36 to 66 do if i mod 2 = 1 then sum:= sum+i;
writeln(sum);
end.

2 votes Thanks 4

Answers & Comments

v kakom akte i scene pogibaet tibalt v povesti romeo i dzhuletta

skolko genotipov i kakie gamety obrazuetsya aabbcc b aabbccdd caabbccdd

kak zapuskaetsya isz

tip tekta opredelite

cvetok simvol francii

rasstavte koefficienty i narishite reakcii zadanie v fotke

3 chast buketa skolko romashek v bukete esli v bukete esli ih na 6 bolshe che

ukazhite izotopy zadanie v kartinke

dva odinakovyh kvadrata s perimetrami 8 sm kazhdyj prilozhili odin k drugomu tak3c43481f659a1c0dc1c8b339171f2e9b 54108

zarplata rabotnika 20 kotoroj ravnozarplata rabotnika 20 kotoroj ravno 30

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

Helpful Links

Helpful Social