НАПИШИТЕ ОТВЕТЫ НА БИЛЕТЫ №1
1. Бездумный исполнитель. Система команд бездумного исполнителя. Исполнитель Муравей. Система команд Муравья.
№2
1. Алгоритм. Виды алгоритмов описания алгоритма.
№3
1. Алгоритм. Свойства алгоритма.
№4
1. Блок-схема. Основные элементы блок-схемы.
№5
1. Алгоритм. Виды алгоритмов. Линейный алгоритм. Блок-схема линейного алгоритма.
№6
1. Алгоритм. Виды алгоритмов. Циклический алгоритм. Блок-схема циклического алгоритма. Цикл "повторить" для Муравья.
№7
1. Алгоритм. Виды алгоритмов. Циклический алгоритм. Блок-схема циклического алгоритма. Цикл "для" для Муравья.
№8
1. Алгоритм. Виды алгоритмов. Циклический алгоритм. Блок-схема циклического алгоритма. Цикл "пока" для Муравья.
№9
1. Алгоритм. Виды алгоритмов. Разветвляющийся алгоритм. Блок-схема разветвляющего алгоритма. Команда "если" для Муравья.
№10
1. Алгоритм. Виды алгоритмов. "Выбор". Блок-схема "выбора". Команда "выбор" для Муравья.
uses crt;
type TRec = Record
FIO: String[20];
TEL: String[7]
end;
var rec: TRec; i:integer;
who:string; flag:boolean;
a: array [1..20] of TRec;
begin
a[1].FIO := 'Иванов Петр';
a[1].TEL := '+374844';
a[2].FIO := 'Крылова Света';
a[2].TEL := '+373129';
a[3].FIO := 'Соловей Иван';
a[3].TEL := '+370929';
//создай дальше до 10 сама
write('Write fio '); readln(who);
for i:=1 to 3 do
begin
if a[i].FIO = who then
begin
writeln('Номер ',who,' = ',a[i].TEL) ;
flag:=true;
end
else
flag:=false;
end;
if flag=false then
writeln('cannot find ',who);
readln;
end.
Я так понимаю, что вы хотели в программе проверить числа на четность/нечетность, но программа по вашему коду этого не сделает.
В таком виде должно быть без ошибок, но работает по-прежнему неверно:
#include "stdio.h"
//#include "math.h"
#include <iostream>
using namespace std;
int main ( )
{
float *a;
int i,n;
printf("n=");
scanf("%i",&n);
a=(float*)malloc(n*sizeof(float));
for( i=0; i<=n-1;i++ )
{
printf("a[%i]= ",i );
scanf("%i",&a[i]);
}
for (i=0; i<=n-1; i++)
{
if (a[i]<0)
{
printf("oshibka\n");
}
else
{
if (a[i]/2==0)
{
printf("chetnoe \n");
}
else
{
printf("nechetnoe\n");
}
}
}
system("pause");
return 1;
}